File No. S370-36 
Order No. SY20-0887-1 



IBM Virtual Machine 
Facility/370: 
System Logic and 
Problem Determination 
Guide Volume 2 

SVStemS Conversational Monitor System (CMS) 

| Release 6 PLC 1 



This publication is intended for the IBM system 
hardware and software support personnel. It 
provides the following information for the CMS 
component of VM/370: 

• Description of program logic 

• Module descriptions and cross-references 

• Abend codes 

PREREQUISITE PUBLICATIONS 

IBM Virtual Machine Facility /370: 

Introduction. Order No. GC20-1800 

Terminal User's Guide, Order No. GC20-1810 

CMS Command and Macro Reference, 
Order No. GC20-1818 

CMS User's Guide, Order No. GC20-1819 



I Second Edition (Harch 1979) 

I This is a najor revision of, and obso\Letes, SY20-0887-0 and Technical 
I newsletter SN25-0479. This edition applies to Release 6 PLC 1 (Prograa 
Level Change) of the IBM Virtual Machine Facility/370 and to all 
subsequent releases until otherwise indicated in new editions or 
Technical Newsletters. Technical changes and additions to text and 
illustrations are indicated by a vertical bar to the left of the change. 

Changes are periodically made to the information herein; before using 
this publication in connection with the operation of IBM systems, 
consult the latest IBM Sy_stea^370 Bibliogra£hjr, Order No. GC20-0001, for 
the editions that are applicable and currant. 

Publications are not stocked at the address given below; requests for 
copies of IBM publications should be made to your IBB representative or 
to the IBM branch office serving your locality. 

A fori for readers' contents is provided at the back of this 
publication. If the forn has been removed, comments nay be addressed to 
IBM Corporation, TM/370 Publications, Dept. D58, Bldg. 706-2, P.O. Box 
390, Poughkeepsie, New York 12602. IEB nay use or distribute any of the 
information you supply in any way it believes appropriate without 
incurring any obligation whatever. You may, of course, continue to use 
the information you supply. 

© Copyright international Business Machines Corporation 1977, 1979 



Preface 



This publication provides the IBM system 
hardware and software support personnel 
with the information needed to analyze 
problems that may occur on the IBM Virtual 
Machine Facility/370 (VM/370) . 



Use the directories and use the VM^37Q 
Data Areas and Control Block Logic to 
help you to isolate the problem. 

Use the method of operation and program 
organization sections, if necessary, to 
understand the operation that was being 
performed. 



HOW THIS MANUAL IS ORGANIZED 



This manual comprises three volumes: 

"Volume 1. VM/370 Control Program (CP)," 
"Volume 2. Conversational Monitor System 
(CMS)," and "Volume 3. Remote Spooling 
Communications Subsystem (RSCS) " contain 
the logic description for each of the 
components. Each of these volumes is 
divided into four sections: Introduction, 
Method of Operation, Directory, and 
Diagnostic Aids. 

The method of operation and program 
organization sections contain the functions 
and relationships of the program routines 
in VM/370. They indicate the program 
operation and organization in a general way 
to serve as a guide in understanding 
VM/370. They are not meant to be a 
detailed analysis of VM/370 programming and 
cannot be used as such. 

The directories contain descriptions of 
all the assemble modules in CP, CMS, and 
RSCS. They also contain extensive 
cross-references between modules and labels 
within a VM/370 component. 

The diagnostic aids sections contain 
additional information useful for 
determining the cause of a problem. 

The Appendix — which is in Volume 1 — 
contains a description of VM/370 Extended 
Control-Program Support (ECPS) . 



HOW TO USE THIS MANUAL 



Isolate the component of VM/370 in which 
the problem occurred. 

Use the list of restrictions in VM/370 
§I§£em Messages to be certain that the 
operation that was being performed was 
valid. 



DEVICE TERMINOLOGY 



The following terms in this publication 
refer to the indicated support devices: 



"2305" refers to IBM 2305 Fixed 
Storage, Models 1 and 2. 



Head 



• "270x" refers to IBM 2701, 2702, and 
2703 Transmission Control Units or the 
Integrated Communications Adapter (ICA) 
on the System/370 Model 135. 

• "3330" refers to the IBM 3330 Disk 
Storage, Models 1, 2, or 11; the IEM 
3333 Disk Storage and Control, Models 1 
or 11; and the 3350 Direct Access 
Storage operating in 3330/3333 Model 1 
or 3330/3333 Model 11 compatibility 
mode. 

• "3340" refers to the IBM 3340 Disk 
Storage, Models A2, B1, and B2, and the 
3344 Direct Access Storage Model B2. 

• "3350" refers to the IBM 3350 Direct 
Access Storage Models A2 and B2 in 
native mode. 

• "3704", "3705", or "370X" refers to IEM 
3704 and 3705 Communications 
Controllers. 

• The term "3705" refers to the 3705 I and 
the 3705 II unless otherwise noted. 

• "2741" refers to the IEM 2741 and the 
3767, unless otherwise specified. 

• "3270" refers to a series of display 
devices, namely the IBM 3275, 3276, 
3277, 3278 Display Stations. A specific 
device type is used only when a 
distinction is required between device 
types. 

Information about display terminal usage 
also applies to the IBM 3036, 3138, 3148, 
and 3158 Display Consoles when used in 
display mode, unless otherwise noted. 



Preface iii 



Any information pertaining to the IBM 
3284 or 3286 also pertains to the IEM 3287, 
3288 and the 3289 printers, unless 
otherwise noted. 



cms component; 
prerequisite publications 

IBM Virtual Machine Facility/370 

Introduction, order No. GC20-1800 

Terminal User's Guide, Order No. 
GC20-1810 

QMS) Command and Macro Reference, Order 
No. GC 2 0—1813 

QMS User's Guide, Order No. GC20-1819 

COREQUISITE PUBLICATIONS 

IBM Virtual Machine Facility/370 

9E§E§lor.Ls Guide, Order No. GC20-1806 

CP Command Reference for General Users, 
Order No. GC20-1820 

System Programmer's Guide, Order No. 
GC20-1807 

Cistern Messages, Order No. GC20-1808 

QI1SEP and Error Recording Guide, Order 
No. GC20-1809 

0£§rating Systems in a Virtual Ma chine, 
Order No. GC20-1821 

Service Routines Program Logic, Order 
No. SY20-0882 

Data £££§.§ and Control Block Logic, 
Order No. SY20-0884 

In addition, for EREP processing the 
following OS/VS Library publications are 
required: 



OS/VS Environmental ESScrding Editing §S^ 

Printing (EREP) Program, Order No. 
GC28-0772 

OS/VS Environmental Recording Editing and 

Printing (ISIE) P£2S£§fi Logic, Order No. 
SY28-0773 



SUPPLEMENTARY PUBLICATIONS 



IBM System/360 Principles of Operation, 
Order No. GA22-6821 

IBM System/370 Principles of Operation, 
Order No. GA22-7000 

IBM OS/VS, D OS/VS, and VM/320 Assembler 
Language, Order No. GC33-4010 

IBM OS/VS and VM/370 Assembler Programmer's 
Gui^e, Order No. GC33-4021 

RELATED PUBLICATION 

IBM Virtual Machine Facility/370 Remote 
Spooling Communications Subsystem (RSCS) 
User's Guide, Order No. GC20-1816 

MISCELLANEOUS INFORMATION 

CMS/DOS is part of the CMS system and is 
not a separate system. The term CMS/DOS is 
used in this publication as a concise way 
of stating that the DOS simulation mode of 
CMS is currently active; that is, the CMS 
command 

SET DOS ON 

has been previously issued. 

The phrase "CMS file system" refers to 
disk files that are in CMS's 800-byte block 
format; CMS's VSAM data sets are not 
included. 
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Summary of Amendments 

for SY20-0887-1 

VH/370 Release 6 PLC 1 



AUTOMATIC REINITIALIZATION SUPPORT 



New: Program and Documentation 

This support allows a CMS virtual 
aachine to specify that control be given 
to a reinitialization program as an 
alternative to entering a disabled wait 
state after an abend. This information 
is included in the "CMS Method of 
Operation and Program Organization" 
section of this publication under 
"Processes IPL Line Parameters" and in 
the "CMS Diagnostic Aids" section of 
this publication under "Unrecoverable 
Termination." 



Summary of Amendments ix 



Summary of Amendments 

for SY20-0887-0 

as updated by TNL SN25-0479 

VM/370 Release 5 PLC 12 



INDEX CORRECTION 



Changed: Documentation only 

The index for VM^/370 System Logic and 
Problem Determination Guide Volume 2 
(CMS) was in error and has been 
corrected. 
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Summary of Amendments 

for SY20-0887 

VH/370 Release 5 PLC 1 



SYSTEM LOGIC AND PROBLEM DETERMINATION 
GOIDE HAS BEEN REORGANIZED 



Changed; Documentation only 



and Problem 
been split into 



YM/370 System Logic 

Det ermination Guide has 

three volumes. 7olume 1 contains the CP 

component, Volume 2 the CMS component, 

and Volume 3 the RSCS component- 

The following material has been removed 
from this publication: 

• "Introduction to Debugging" and 
"Debugging with CMS." This 
information can be found in VM/370 
System Programmer's Guide. 

• "Appendix A. VM/370 Coding 
Conventions." This information can 
be found in VM/370 System Pr o g ram me rs 
Guide. 

• "Appendix B. DASD Record Formats." 
This information can be found in 
IIZ120 Service Routines Program Logic 
in the FORMAT section. 

• "Appendix C. VM/370 Restrictions." 
This information can be found in 
VM/370 Planning and System Generation 
Guide or VM/3 70 System Messages. 

• "Appendix D. Applying PTFs." This 
information can be found in VM/370 
Planning and System Generation Guid e. 

The following sections have been removed 
from the "CMS Diagnostic Aids" section 
of this publication: 

• ZAP Service Program. A complete 
description of ZAP can be found in 
XlZiZP. Operator's Guide. 

• DDR. A complete description of DDR 
can be found in VM/370 Operator's 
Guide . 

• CMS Return Codes. These can be found 
in VM/370 System Mess ag es. 

• Commands for Debugging. A complete 
description of DEBUG can be found in 
1M11Q. CMS Oserls Guide. 



The following has been added to Volume 
2: 

• "Appendix A: CMS Macro Library" 

• "Appendix B: CMS/DCS Macro Library" 

The following topics have been removed 
from "CP Diagnostic Aids": 

• CP Commands Used to Debug the virtual 
Machine. These are contained in 
I15Z370 CP Command Reference for 
Gener al Osers. 

• CP Commands for System Programmers. 
These are contained in VM/370 
Oper ato r's Guide. 



VM/370 SDPPORTS 3031, 3032, AND 3033 
PROCESSORS 



New: Program Feature 

VM/370 provides support for the new 
channel-attached consoles that are part 
of the 3033 processors. VM/370 uses the 
3033 processor model numbers in 
selecting model-dependent routines and 
setting pertinent time slices. The 
channels of the new processors are 
supported by the channel check error 
recovery routine. 

During initialization of the machine 
check handler/channel check handler, 
error frames are read from the Service 
Record File (SRF) and written to the 
VM/370 error recording area as a new 
record type. 



Summary of Amendments xi 



VM/370 MONITOR COMMAND ENHANCED • Specification of a userid as the 

recipient of the spooled monitor 



data. 



New: Program Feature 



VM/370 monitor facilities now include, 

in addition to data collection on tape, MISCELLANEOUS 

spooling to disk. Operands have been 

added to the MONITOR command that allow: 

Changed: Programming and Documentation 

• The automatic start and stop of data 

collection by defined time-fo-day Minor technical and editorial changes 
values- have been made in order to clarify the 

text. 

• The automatic start and stop of data 
collection by defining a high limit 
value. 
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Conversational Monitor System (CMS) 



This section contains the following information: 

• Introduction to CMS 

• Interrupt Handling in CMS 

• Functional Information 

• OS Macros Dnder CMS 

• DOS/VS Support Under CMS 
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Introduction To CMS 



The Conversational Monitor System (CMS) , the major subsystem of VM/370, 
provides a comprehensive set of conversational facilities to the user. 
Several copies of CMS may run under CP, thus providing several users 
¥ith their own time sharing system. CHS is designed specifically for 
the ¥H/370 virtual machine environment. 

Each copy of CMS supports a single user. This means that the storage 
area contains only the data pertaining to that user. Likewise, each CMS 
user has his own machine configuration and his own files. Debugging is 
simpler because the files and storage area are protected from other 
users.. 

Programs can be debugged from the terminal. The terminal is used as 
a printer to examine limited amounts of data. After examining program 
data, the terminal user can enter commands on the terminal that will 
alter the program. This is the most common method used to debug 
programs that run in CMS. 

CMS, operating with the 7M/370 Control Program, is a time sharing 
system suitable for problem solving, program development, and general 
work. It includes several programming language processors, file 
manipulation commands, utilities, and debugging aids. Additionally, CMS 
provides facilities to simplify the operation of other operating systems 
in a virtual machine environment when controlled from a remote terminal. 
For example, CMS capabilities are used to create and modify job streams, 
and to analyze virtual printer output. 

Part of the CMS environment is related to the virtual machine 
environment created by CP. Each user is completely isolated from the 
activities of all other users, and each machine in which CMS executes 
has virtual storage available to it and managed for it. The CP commands 
are recognized by CMS. For example, the commands allow messages to be 
sent to the operator or to other users, and virtual devices to be 
dynamically detached from the virtual machine configuration. 



The CMS Command Language 

The CHS command language offers terminal users a wide range of 
functions. It supports a variety of programming languages, service 
functions, file manipulation, program execution control, and general 
system control. For detailed information on CMS commands, refer to the 
VM/370 CMS Command and Macro Reference. 

Figure 4 describes CMS command processing. 
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The File System 

The Conversational Monitor System interfaces with virtual disks, tapes, 
and unit record equipment. The CMS residence device is kept as a 
read-only, shared, system disk. Permanent user files may be accessed 
from up to nine active disks. Logical access to those virtual disks is 
controlled by CMS, while CP facilities manage the device sharing and 
virtual-to-real mapping. 

Oser files in CMS are identified with three designators. The first 
is filename. The second is a filetype designator that may imply 
specific file characteristics to the CMS file management routines. The 
third is a filemode designator that describes the location and access 
mode of the file. 

The compilers available under CMS default to particular input 
filetypes, such as ASSEMBLE, but the file manipulation and listing 
commands do not. Files of a particular filetype form a logical data 
library for a user; for example, the collection of all COBOL source 
files, or of all object (TEXT) decks, or of all EXEC procedures. This 
allows selective handling of specific groups of files with minimum input 
by the user. 

User files can be created directly from the terminal with the CMS 
EDIT facility. EDIT provides extensive context editing services. File 
characteristics such as record length and format, tab locations, and 
serialization options can be specified. The system includes standard 
definitions for certain filetypes. 

CMS automatically allocates compiler work files at the beginning of 
command execution on whichever active disk has the greatest amount of 
available space, and deallocates them at completion. Compiler object 
decks and listing files are normally allocated on the same disk as the 
input source file or on the primary read/write disk, and are identified 
by combining the input filename with the filetypes TEXT and LISTIHG. 
These disk locations may be overridden by the user. 

A single user file is limited to a maximum of 65533 records and must 
reside on one virtual disk. The file management system limits the 
number of files on any one virtual disk to 3100. All CMS disk files are 
written as 800-byte records, chained together by a specific file entry 
that is stored in a table called the Master File Directory; a separate 
Master File Directory is kept for, and on, each virtual disk. The data 
records may be discontiguous, and are allocated and deallocated 
automatically. A subset of the Master File Directory (called the Oser 
File Directory) is made resident in virtual storage when the disk 
directory is made available to CMS; it is updated on the virtual disk at 
least once per command if the status of any file on that disk has been 
changed. 

Virtual disks may be shared by CMS users; the facility is provided by 
¥M/370 to all virtual machines, although a user interface is directly 
available in CMS commands. Specific files may be spooled between 
virtual machines to accomplish file transfer between users. Commands 
allow such file manipulations as writing from an entire disk or from a 
specific disk file to a tape, printer, punch, or the terminal. Other 
commands write from a tape or virtual card reader to disk, rename files, 
copy files, and erase files. * Special macro libraries and text or 
program libraries are provided by CMS, and special commands are provided 
to update and use them. CMS files can be written onto and restored from 
unlabeled tapes via CMS commands. 

C auti on; Multiple write access under CMS can produce unpredictable 
results. 
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Problem programs which execute in CHS can create files on unlabeled 
tape in any record and block size; the record format can be fixed, 
variable, or undefined. Figure 1 describes the CMS file system. 



Program Development 

The Conversational Monitor System includes commands to create and 
compile source programs, to modify and correct source programs, to build 
test files, to execute test programs and to debug from the terminal. 
The commands of CMS are especially useful for OS and DOS/VS program 
development, but also may be used in combination with other operating 
systems to provide a virtual machine program development tool. 

CMS utilizes the OS and DOS/VS compilers via interface modules; the 
compilers themselves normally are not changed. In order to provide 
suitable interfaces, CMS includes a certain degree of OS and DOS/VS 
simulation. The sequential, direct, and partitioned access methods are 
logically simulated; the data records are physically kept in the chained 
800-byte blocks that are standard to CMS, and are processed internally 
to simulate OS data set characteristics. CMS supports VSAM catalogs, 
data spaces, and files on OS and DOS disks using the DOS/VS access 
Method Services. OS Supervisor Call functions such as GETMAIN/FREEMAIN 
and TIME are simulated. The simulation restrictions concerning what 
types of OS object programs can be executed under CMS are primarily 
related to the OS/PCP, MFT, and MVT Indexed Sequential Access Method 
(ISAM) and the telecommunications access methods, while functions 
related to multitasking in OS and DOS/VS are ignored by CMS. For more 
information, see "OS Macro Simulation under CMS" and "DOS/VS Support 
under CMS." 
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Interrupt Handling In CMS 



CMS receives virtual SVC, input/output, program, machine, and external 
interruptions and passes control to the appropriate handling program. 



SVC Interruptions 

The Conversational Monitor system is SVC (supervisor call) driven. SVC 
interruptions are handled by the DMSITS resident routines. Two types of 
SVCs are processed by DMSITS: internal linkage SVC 202 and 203, and any 
other SVCs. The internal linkage SVC is issued by the command and 
function programs of the system when they reguire the services of other 
CMS programs. (Commands entered by the user from the terminal are 
converted to the internal linkage SVC by DMSINT) . The OS SVCs are 
issued by the processing programs (for example, the Assembler) . 



INTERNAL LINKAGE SVCS 

When DMSITS receives control as a result of an internal linkage SVC (202 
or 203) , it saves the contents of the general registers, floating-point 
registers, and the SVC old PSW, establishes the normal and error return 
addresses, and passes control to the specified routine. (The routine is 
specified by the first 8 bytes of the parameter list whose address is 
passed in register 1 for SVC 202, or by a halfword code following SVC 
203.) 

For SVC 202, if the called program is not found in the internal 
function table of nucleus (resident) routines, then DMSITS attempts to 
call in a module (a CMS file with filetype MODULE) of this name via the 
LOADMOD command. 

If the program was not found in the function table, nor was a module 
successfully loaded, DMSITS returns an error code to the caller. 

To return from the called program, DMSITS restores the calling 
program's registers, and makes the appropriate normal or error return as 
defined by the calling program. 



OTHER SVCs 

The general approach taken by DMSITS to process other SVCs supported 
under CMS is essentially the same as that taken for the internal linkage 
SVCs. However, rather than passing control to a command or function: 
program, as is the case with the internal linkage SVC, DMSITS passes 
control to the appropriate routine. The SVC number determines the 
appropriate routine. 

In handling non-CMS SVC calls, DMSITS refers first to a user-defined 
SVC table (if one has been set up by the DMSHDS program) . If the 
user-defined SVC table is present, any SVC number (other than 202 or 
203) is looked for in that table. If it is found, control is 
transferred to the routine at the specified address. 
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If the SVC number is not found in the user-defined SVC table (or if 
the table is nonexistent) , DMSITS either transfers control to the CMSDCS 
shared segment (if SETDOS ON has been issued) , or the standard system 
table (contained in DMSSVT) of OS calls is searched for that SVC number. 
If the SVC number is found, control is transferred to the corresponding 
address in the usual manner. If the SVC is not in either table, then 
the supervisor call is treated as an abend call. 

The DMSHDS initialization program sets up the user-defined SVC table. 
It is possible for a user to provide his own SVC routines. 



Input/Output Interruptions 

All input/output interruptions are received by the I/O interrupt 
handler, DHSITI. DMSITI saves the I/O old PSW and the CSW (channel 
status word) . It then determines the status and requirements of the 
device causing the interruption and passes conliol to the routine that 
processes interruptions from that device. DMSITI scans the entries in 
the device table until it finds the one containing the device address 
that is the same as that of the interrupting device. The device table 
(DEVTAB) contains an entry for each device in the system. Each entry 
for a particular device contains, among other things, the address of the 
program that processes interruptions from that device. 

When the appropriate interrupt handling routine completes its 
processing, it returns control to DMSITI. At this point, DMSITI tests 
the wait bit in the saved I/O old PSW. If this bit is off, the 
interruption was probably caused by a terminal (asynchronous) I/O 
operation. DMSITI then returns control to the interrupted program by 
loading the I/O old PSH. 

If the wait bit is on, the interruption was probably caused by a 
nonterminal (synchronous) I/O operation. The program that initiated the 
operation most likely called the DMSIOW function routine to wait for a 
particular type of interruption (usually a device end) . In this case, 
DMSITI checks the pseudo-wait bit in the device table entry for the 
interrupting device. If this bit is off, the system is waiting for some 
event other than the interruption from the interrupting device; DMSITI 
returns to the wait state by loading the saved I/O old PSW. (This PSW 
has the wait bit on.) 

If the pseudo-wait bit is on, the system is waiting for an 
interruption from that particular device. If this interruption is not 
the one being waited for, DMSITI loads the saved I/O old PSW. This will 
again place the machine in the wait state. Thus, the program that is 
waiting for a particular interruption will be kept waiting until that 
interruption occurs. 

If the interruption is the one being waited for, DMSITI resets both 
the pseudo-wait bit in the device table entry and the wait bit in the 
I/O old PSW. It then loads that PSW. This causes control to be 
returned to the DMSIOW function routine, which, in turn, returns control 
to the program that called it to wait for the interruption. 
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Terminal Interruptions 

Terminal input/output interruptions are handled by the BHSCIT module. 
All interruptions other than those containing device end, channel end, 
attention, or unit exception status are ignored. If device end status 
is present with attention and a write CCW was terminated, its buffer is 
unstacked. An attention interrupt causes a read to be issued to the 
terminal, unless attention exits have been queued via the STAX macro. 
The attention exit with the highest priority is given control at each 
attention until the queue is exhausted, then a read is issued. Device 
end status indicates that the last I/O operation has been completed. If 
the last I/O operation was a write, the line is deleted from the output 
buffer and the next write, if any, is started. If the last I/O 
operation was a normal read, the buffer is put on the finished read list 
and the next operation is started. If the read was caused by an 
attention interrupt, the line is first checked for the commands ST, EC, 
BT, or HX, and the appropriate flags are set if one is found, unit 
exception indicates a canceled read. The read is reissued, unless it 
had been issued with ATTREST=NO, in which case unit exception is treated 
as device end. 



Reader/ Punch/Printer Interruptions 

Interruptions from these devices are handled by the routines that 
actually issue the corresponding I/O operations. When an interruption 
from any of these devices occurs, control passes to BMSITI. Then BMSITI 
passes control to DMSIOW, which returns control to the routine that 
issued the I/O operation. This routine can then analyze the cause of 
the interruption. 



User-Controlled Device Interruptions 

Interrupts from devices under user control are serviced the same as CMS 
devices except that DMSIOW and DMSITI manipulate a user-created device 
table, and BMSITI passes control to any user-written interrupt 
processing routine that is specified in the user device table. 
Otherwise, the processing program regains control directly. 

Program Interruptions 

The program interruption handler, DMSITP, receives control when a 
program interruption occurs. When DMSITP gets control, it stores the 
program old PSW and the contents of the registers 14, 15, 0, 1, and 2 
into the program interruption element (PIE) . (The routine that handles 
the SPIE macro instruction has already placed the address of the program 
interruption control area (PICA) into PIE.) DMSITP then determines 
whether or not the event that caused the interruption was one of those 
selected by a SPIE macro instruction. If it was not, DMSITP passes 
control to the DMSABN abend recovery routine. 

If the cause of the interruption was one of those selected in a SPIE 
macro instruction, DMSITP picks up the exit routine address from the 
PICA and passes control to the exit routine. Opon return from the exit 
routine, DMSITP returns to the interrupted program by loading the 
original program check old PSW. The address field of the PSW was 
modified by a SPIE exit routine in the PIE. 

CMS Introduction 2-9 



External Interruptions 

An external interruption causes control to be passed to the external 
interrupt handler DMSITE. If the user has issued the HNDEXT macro to 
trap external interrupts, DMSITE passes control to the user's exit 
routine. If the interrupt was caused by the timer, DMSITE resets the 
timer and types the BLIP character at the terminal. The standard BLIP 
timer setting is two seconds, and the standard BLIP character is 
uppercase, followed by the lowercase (it moves the typeball without 
printing). Otherwise, control is passed to the DEBUG routine. 



Machine Check Interruptions 

Hard machine check interruptions on the real processor are not reflected 
to a CMS virtual user by CP. A message prints en the console indicating 
the failure. The user is then disabled and must IPL CBS again in order 
to continue. 
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Functional Information 



The most important thing to remember about CMS, frosi a debugging 
standpoint, is that it is a one-user system. The supervisor manages 
only one user and keeps track of only one user's file and storage 
chains. Thus, everything in a dump of a particular machine relates only 
to that virtual machine's activity. 

You should be familiar with register usage, save area structuring, 
and control block relationships before attempting to debug or alter CMS. 



D _. ~~ : ^ 4- .n. ». I InOMA 

ncyiaici uaayc 

When a CMS routine is called, R1 must point to a valid parameter list 
(PLIST) for that program. On return, RO may or may not contain 
meaningful information (for example, on return from a call to FILED EF 
with no change, RO will contain a negative address if a new FCB has been 
set up; otherwise, a positive address of the already existing FCB) . R15 
will contain the return code, if any. The use of Registers and 2 
through 11 varies. 

On entry to a command or routine called by SVC 202 the following are 
in effect: 

Rggister Contents 

1 The address of the PLIST supplied by the caller. 

12 The address entry point of the called routine. 

13 The address of a work area (12 doublewords) supplied by 

SVCINT. 

14 The return address to the SVCINT routine. 

15 The entry point (same as register 12) . 

On return from a routine. Register 15 contains: 

Return 

_Code_ Meaning 

No error occurred 

<0 Called routine not found 

>0 Error occurred 

If a CMS routine is called by an SVC 202, registers through 14 are 
saved and restored by CMS. 

Most CMS routines use register 12 as a base register. 



Structure of DMSNUC 

DMSNOC is the portion of storage in a CMS virtual machine that contains 
system control blocks, flags, constants, and pointers. 

The CSECTs in DMSHOC contain only symbolic references. This means 
that an update or modification to CMS, which changes a CSECT in DMSNOC, 
does not automatically force all CMS modules to be recompiled. Only 
those modules that refer to the area that was redefined must be 
recompiled. 
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DSERSECT (USER AREA) 

The DSERSECT CSECT defines space that is not used by CMS. A 

modification or update to CMS can use the 18 fullwords defined for 

DSERSECT. There is a pointer (ADSER) in the NOCON area to the user 
space. 



DEVTAB (DEVICE TABLE) 

The DEVTAB CSECT is a table describing the devices available for the CMS 
system. The table contains the following entries: 

1 console 
10 disks 
1 reader 
1 punch 
1 Printer 
4 tapes 

You can change some existing entries in DEVTAB. Each device table 
entry contains the following information: 

• Virtual device address 

• Device flags 

• Device types 

• Symbol device name 

• Address of the interrupt processing routine (for the console) 

The virtual address of the console is defined at IPL time. The 
virtual address of the user disks can be altered dynamically with the 
ACCESS command. The virtual address of the tapes can te altered in the 
device table. Changing the virtual address of the reader, printer, or 
punch will have no effect. Figure 2 describes the devices supported by 
CMS. 



Structure of CMS Storage 

Figure 3 describes how CMS uses its virtual storage. The pointers 
indicated (MAINSTRT, MAINHIGH, FREELOWE, and FREEDPPR) are all found in 
NOCON (the nucleus constant area) . 

The sections of CMS storage have the following uses: 

• DMSHOC (2LL00()<)()1 to approximately. X'OaQOQ 1 ) . This area contains 
pointers, flags, and other data updated by the various system 
routines. 

• Low-Storage DM S FREE Free Storage Area (Approximately X 1 03000' to 
X* 0E000 1 ) . This area is a free storage area, from which requests 
from DMSFREE are allocated. The top part of this area contains the 
file directory for the System Disk (SSTAT) . If there is enough room 
(as there will be in most cases) , the FREETAB table also occupies 
this area, just below the SSTAT. 
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Virtual 


Virtual 


Symbolic 








IBM Device 


Address 1 


Name 




Device Type 


3210, 


3215, 


1052, 


ecu 


CON1 


System console 


3066, 


3270 














2314, 


3330, 


3340 


190 


DSK0 


System disk (read— only) 


3350 
















2314, 


3330, 


3340 


1912 


DSK1 


Primary disk (user files) 


3350 
















2314, 


2319, 


3330, 


ecu 


DSK2 


Disk 


(user 


files) 


3340, 


3350 














2314, 


2319, 


3330, 


ecu 


DSK3 


Disk 


(user 


files) 


3340, 


3350 














2314, 


2319, 


3330, 


192 


DSK4 


Disk 


(user 


files) 


3340, 


3350 














2314, 


2319, 


3330, 


ecu 


DSK5 


Disk 


(user 


files) 


3340, 


3350 














2314,' 


2319, 


3330, 


ecu 


DSK6 


Disk 


(user 


files) 


3340, 


3350 














2314, 


2319, 


3330, 


ecu 


DSK7 


Disk 


(user 


files) 


3340, 


3350 














2314, 


2319, 


3330, 


19E 


DSK8 


Disk 


(user 


files) 


3340, 


3350 














2314, 


2319, 


3330, 


ecu 


DSK9 


Disk 


(user 


files) 


3340, 


3350 














1403, 


3203, 


3211 


00E 


PRN1 


Line 


printer 


1443 
















2540, 


2501, 


3505 


OOC 


RDR1 


Card 


reader 


2540, 


3525 




00D 


PCH1 


Card 


punch 




2415, 


2420, 


3410, 


181-4 


TAP1-TAP4 


Tape 


drives 


3420 

















*The device addresses shown are those that are preassembled into the 
CHS resident device table. These need only be modified and a new 
device table made resident to change the addresses. 

2 The virtual device address (ecu) of a disk for user files can be 
any valid System/370 device address, and can be specified by the 
CMS user when he activates a disk. If the user does not activate 
a disk immediately after loading CMS, CMS automatically activates 
the primary disk at virtual address 191. 



Figure 2. Devices Supported by a CMS Virtual Machine 



Transient Program Area (XJ0E000J to XJJOOOC^) . Since it is not 
essential to keep all nucleus functions resident in storage all the 
time, some of them are made "transient." This means that when they 
are needed, they are loaded from the disk into the transient program 
area. Such programs may not be longer than two pages, because that 
is the size of the transient area. (A page is 4096 bytes of virtual 
storage.) All transient routines must be serially reusable since 
they are not read in each time they are needed. 

CMS Nucleus (XL1Q0Q01 to XJ.2000.0J.) . Segment 1 of storage contains 
the reentrant code for the CMS Nucleus routines. In shared CMS 
systems, this is the "protected segment," which must consist only of 
reentrant code, and may not be modified under any circumstances. 
Thus, such functions as DEBDG breakpoints or CP address stops cannot 
be placed in Segment 1 when it is a protected segment in a saved 
system. 
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User Program Area ( 1120 00 02. to Loader Tables) . Oser programs are 
loaded into this area by the LOAD coamand. Storage allocated by 
■eans of the GETMAIN macro instruction is taken from this area, 
starting from the high address of the user program. In addition, 
this storage area can be allocated from the top down by DMSFREE, if 
there is not enough storage available in the low DMSFREE storage 
area. Thus, the usable size of the user program area is reduced by 
the amount of free storage that has been allocated from it by 
DMSFREE. 

h.Q.z&SiL Tables (Top pages of storage) . The top of storage is occupied 
by the loader tables, which are reguired by the CMS loader. These 
tables indicate which modules are currently loaded in the user 
program area (and the transient program area after a LOAD command) . 
The size of the loader tables can be varied by the SET LDRTBLS 
command. However, to successfully change the size of the loader 
tables, the SET LDRTBLS command must be issued immediately after IPL. 



Free Storage Management 

Free storage can be allocated by issuing the GETMAIN or DHSFREE macros. 
Storage allocated by the GETMAIN macro is taken from the user program 
area, beginning after the high address of the user program. 

Storage allocated by the DMSFREE macro can be taken from several 
areas. 

If possible, DMSFREE requests are allocated from the low address free 
storage area. Otherwise, DMSFREE requests are satisfied from the 
storage above the user program area. 

There are two types of DMSFREE requests for free storage: requests 
for USER storage and NDCLEDS storage. Because these two types of 
storage are kept in separate 4K pages, it is possible for storage of one 
type to be available in low storage, while no storage of the other type 
is available. 



GETMAIN FREE STORAGE MANAGEMENT 

All GETMAIN storage is allocated in the user program area, starting 
after the end of the user*s actual program. Allocation begins at the 
location pointed to by the NDCON pointer MAINSTRT. The location 
MAINHIGH in NOCON is the "high extend" pointer for GETMAIN storage. 

Before issuing any GETMAIN macros, user programs must use the STRINIT 
macro to set up user free storage pointers. The STRINIT macro is issued 
only once, preceding the initial GETMAIN request. The format of the 
STRINIT macro is: 



I I I r r in 

I [label] | STRINIT | I TYPCALL= |SVC M 
I I II IBALRH 

I I I «- L JJ 

i 
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where: 

r t 

TYPCALL=|SVC | 
|BALR| 

L J 

indicates how control is passed to DMSSTG, the routine that 
processes the STRINIT macro. Since DMSSTG is a 
nucleus-resident routine, other nucleus-resident routines can 
branch directly to it ( TYPCALL=BALB) while routines that are 
not nucleus-resident must use linkage SVC (TYPCALL=SVC) . If no 
operands are specified, the default is TYPCALL=SVC. 

When the STRINIT macro is executed, both MAINSTRT and MAINHIGH are 
initialized to the end of the user's program, in the user program area. 
As storage is allocated from the user program area to satisfy GETMAIN 
requests, the MAINHIGH pointer is adjusted upward. Such adjustments 
are always in multiples of doublewords, so that this pointer is always 
on a doubleword boundary. As the allocated storage is released, the 
HAINHIGH pointer is adjusted downward. 

The pointer MAINHIGH can never be higher than FREELOWE, the "low 
extend" pointer for DMSFREE storage allocated in the user program area. 
If a GETMAIN reguest cannot be satisfied without extending MAINHIGH 
above FREELOWE, then GETMAIN will take an error exit, indicating that 
insufficient storage is available to satisfy the reguest. 

The area between MAINSTRT and MAINHIGH may contain blocks of storage 
that are not allocated and that are, therefore, available for allocation 
by a GETMAIN instruction. These blocks are chained together, with the 
first one pointed to by the NDCON location MAINSTRT. Refer to Figure 3 
for a description of CMS virtual storage usage. 

The format of an element on the GETMAIN free element chain is as 
follows: 

i 1 1 1 1 

FREPTR — pointer to next free 
0(0) j element in the chain, or 
if there is no next element 

FRELEN — length, in bytes, of 
4 (4) | this element 

1 j j 



Remainder of this free element 



When issuing a variable- length GETMAIN, two and one-half pages are 
reserved for CMS usage; this is a design value. A user who needs 
additional reserved pages (for example, for larger directories) should 
free up some of the variable GETMAIN storage from the high end. 
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CONTROL BLOCKS 
-IN FREE STORAGE - 



END OF STORAGE 



VIRTUAL 
STORAGE 



System Loader Table (Size determined 
by SET LDRTBLS command) Storage Key , xf - 



DMSFREE requests when 
no more low storage available 



Storage 
Key = XT- 



Unused portion of User 
-r' Program Area 



:**V; 



GETMAIN requests 



Storage 
Key = X'E' 



The User's Program 

(program is loaded via the 

LOAD command) 



Storage Key = X'E' 



CMS Nucleus 

In "saved systems" this area 
is a protected segment 
(that is, all code must be 
reentrant and cannot be 
modified) 

Storage Key = 



User 
Area 



Transient Program Area 

Storage Key = X'E' 



Low Storage DMSFREE Free Storage Area 
DMSFREE requests are filled from 
this area. The upper part of this 
area contains the System Disk MFD 
followed by the FREETAB, if there is 
enough room. 

Storage Key = X'E' or X'F' 



DMSNUC 

System Control Blocks, flags, constants, 
and pointers. 



Storage Key = X'F'* 



•The half-page containing OPSFCT and TSOBLOKS 
has a storage key = X'E' 



DMSNUC 

USERSECT 



Terminal Buffer and Saveareas 



MACDIRC and TXTDIRC 



X'2AD8' 
X'2A40' 
X-29BO' 
X-2800' 
X-2360- 

X'2300" 
X'2190" 
X-IDDO" 

X'1CC8' 

X1AD8' 

X'19E8' 

X'1748' 

X'16B0' 
X'1620' 

X'1550' 

X'1200' 

X'DFO' 
X'CflO' 
X'700' 
X'600* 
X'2E0' 



Figure 3. CMS Storage Sap 
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DMSFREE FREE STORAGE MANAGEMENT 



The DMSFREE macro allocates CMS free storage. The format of the DMSFREE 
macro is: 



[label] | DMSFREE | DIORDS= 



/ n \ |,MIN=J n \\ 
1(0) / I 1(1) /! 



r r n r r n 

|,TYPE=|USER || | ,ERR=|laddrJ | 

| INUCLEUSJI J I * II 

L L JJ L L JJ 

r r n r r n 

|,AREA=|LOW || |,TYPCALL=|SVC || 

I IHIGHM | IBALRII 

L L JJ L L JJ 



where: 



label 



is any valid assembler language label 



DW0RDS=f n ) 
\(0)/ 



MIN= 



is the number of doublewords of 
DW0RDS=n specifies the number of 
DWORDS= (0) indicates that register 
doublewords requested. 



free storage requested. 

doublewords directly and 

contains the number of 



{A} 



indicates a variable request for free storage. If the exact 
number of doublewords indicated by the DWORDS operand is not 
available, then the largest block of storage that is greater 
than or equal to the minimum is returned. MIN=n specifies the 
minimum number of doublewords of free storage directly while 
MIN= (1) indicates that the minimum is in register 1. The 
actual amount of free storage allocated is returned to the 
requestor via general register 0. 



TYPE=|USER | 
| NUCLEUS | 

L J 

indicates the type of CMS storage with which this request for 
free storage is filled: USER or NUCLEUS. 

r t 

ERR=|laddr| 

I * I 

L J 

is the return address if any error occurs, "laddr" is any 
address that can be referred to in an LA (load address) 
instruction. The error return is taken if there is a macro 
coding error or if there is not enough free storage available 
to fill the request. If the asterisk (*) is specified for the 
return address, the error return is the same as a normal 
return. There is no default for this operand. If it is 
omitted and an error occurs, the system will abend. 
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r t 

AREA=|LOH | 

|HIGH| 

L J 

indicates the area of CMS free storage from which this request 
for free storage is filled. LOW indicates the low storage 
area between DMSNUC and the transient program area. HIGH 
indicates the area of storage between the user program area 
and the CMS loader tables. If AREA is not specified, storage 
is allocated wherever it is available. 

r t 

TYPCALL=|SVC | 
IBALRj 

L J 

indicates how control is passed to DMSFREE. Since DMSFREE is 
a nucleus- resident routine, other nucleus-resident routines 
can branch directly to it (TYPCALL=BALR) while routines that 
are not nucleus- resident must use linkage SVC (TYPCALL=SVC) . 



The pointers FREEDPPR and FREELOWE in NOCON indicate the amount of 
storage that DMSFREE has allocated from the high portion of the user 
program area. These pointers are initialized to the beginning of the 
loader tables. 

The pointer FREELOWE is the "low extend" pointer of DMSFREE storage 
in the user program area. As storage is allocated from the user program 
area to satisfy DMSFREE requests, this pointer will be adjusted 
downward. Such adjustments are always in multiples of UK bytes, so that 
this pointer is always on a 4K boundary. As the allocated storage is 
released, this pointer is adjusted upward. 

The pointer FREELOWE can never be lower than MAINHIGH, the "high 
extend" pointer for GETMAIN storage. If a DMSFREE request cannot be 
satisfied without extending FREELOWE below MAINHIGH, then DMSFREE will 
take an error exit, indicating that storage is insufficient to satisfy 
the request. Figure 3 shows the relationship of these storage areas. 

The FREETAB free storage table is kept in free storage, usually in 
low storage, just below the Master File Directory for the System Disk 
(S-disk) . However, the FREETAB may be located at the top of the user 
program area. This table contains one byte for each page of virtual 
storage. Each such byte contains a code indicating the use of that page 
of virtual storage. The codes in this table are as follows: 



Code 
DSERCODE (X'OI 1 ) 

NOCCOBE (X'02 1 ) 

TRNCODE (X'Oa 1 ) 

DSARCODE (X^O** 1 ) 

SYSCODE (X'05 1 ) 



Meaning 
The page is assigned to user storage. 

The page is assigned to nucleus storage. 

The page is part of the transient program area. 

The page is part of the user program area. 

The page is none of the above. The page is assigned 
to system storage, system code, or the loader 
tables. 



Other DMSFREE storage pointers are maintained in the DMSFRT CSECT, in 
NDCON. The four chain header blocks are the most important fields in 
DMSFRT- The four chains of unallocated elements are: 
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• The low storage nucleus chain 

• The low storage user chain 

• The high storage nucleus chain 

• The high storage user chain 

For each of these chains of unallocated elements, there is 
block consisting of four words, with the following format: 



a control 



0(0) 



4(4) 



8(8) 



12(C) 



1 1 T 

POINTER — pointer to the first 
free element on the chain, or 
zero, if the chain is empty. 

1 1 , 



NOM — the number of elements on 
the chain. 



I 



I 



I 



MAX — a value equal to or greater 
than the size of the largest 
element. 

I 



FLAGS- | SKEY - | TCODE - | Unused 
Flag | Storage |FREETAB I 
byte j key | code | 

1 1 L 



wh ere : 
POINTER 



points to the first element on this chain of free elements. 
If there are no elements on this free chain, then the POINTER 
field contains all zeros. 



NUN 



contains the number of elements on this chain of free 
elements. If there are no elements on this free chain, then 
this field contains all zeros. 



MAX 



FLAGS 



is used to avoid searches that will fail. It contains a 
number not exceeding the size, in bytes, of the largest 
element on the free chain. Thus, a search for an element of a 
given size will not be made if that size exceeds the MAX 
field. However, this number may actually be larger than the 
size of the largest free element on the chain. 

The following flags are used: 

FLCLN (X«80») — Clean-up flag. This flag is set if the chain 
must be updated. This will be necessary in the following 
circumstances: 

• If one of the two high storage chains contains a 4K page to 
which FREELOWE points, then that page can be removed from 
the chain, and FREELOWE can be increased. 

• All completely unallocated 4K pages are kept on the user 
chain, by convention. Thus, if one of the nucleus chains 
(low storage or high storage) contains a full page, then 
this page lust be transferred to the corresponding user 
chain. 

FLCLB (X«40*) — Destroyed flag. Set if the chain has been 
destroyed. 



FLHC (X^O 1 ) — High storage chain, 
and user high-storage chains. 



Set for both the nucleus 
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FLND (X'10 1 ) — Nucleus chain. Set for both the low storage 
and high storage nucleus chains. 

FLPA (X»08») — Page available. This flag is set if there is 
a full 4K page available on the chain. This flag aay be set 
even if there is no such page available. 

SKEY contains the one-byte storage key assigned to storage on this 
chain. 

TCODE contains the one-byte FREETAB table code for storage on this 
chain. 



allocating Oser Free Storage 

When DMSFREE with TYPE=USER (the default) is called, one or more of the 
following steps are taken in an attempt to satisfy the request. As soon 

as one of the following steps succeeds, then user frss stcrsGc 
allocation processing terminates. 

1. Search the low storage user chain for a block of the required size. 

2. Search the high storage user chain for a block of the required 
size. 

3. Extend high storage user storage downward into the user program 
area, modifying FREELOWE in the process. 

4. For a variable request, put all available storage in the user 
program area onto the high storage user chain, and then allocate 
the largest block available on either the high storage user chain 
or the low storage user chain. The allocated block will not be 
satisfactory unless it is larger than the minimum requested size. 



!2iP.cating Nucleus Free Storage 

When DMSFREE with TYPE=NDCLEOS is called, the following steps are taken 
in an attempt td satisfy the request, until one succeeds: 

1. Search the low storage nucleus chain for a block of the required 
size. 

2. Get free pages from the low storage user chain, if any are 
available, and put them on the low storage nucleus chain. 

3. Search the high storage nucleus chain for a block of the required 
size. 

4. Get free pages from the high storage user chain, if they are 
available, and put them on the high storage nucleus chain. 

5. Extend high storage nucleus storage downward into the User Program 
Area, modifying FREELOWE in the process. 

6. For variable requests, put all available pages from the user chains 
and the user program area onto the nucleus chains, and allocate the 
largest block available on either the low storage nucleus chains, 
or the high storage nucleus chains. 
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Releasing Storage 



The DMSFRET lacro releases free storage previously allocated 
DMSFREE macro. The format of the DMSFRET macro is: 



with the 



[label] | DMSFRET 



DWORDS=( n \, LOC=j laddr \ 
\(0)/ \ (D I 
r r n r r n 

|,ERR=|laddr I | | ,TYPCALL=|SVC H 
I I * II I IBALRII 

L L JJ L L JJ 



where: 

label 

DWORDS= 



UM 



LOC=/ laddr ) 
\ (D J 



is any valid Assembler language label. 

is the number of doublewords of storage to be released. 
DffORDS=n specifies the number of doublewords directly and 
DWORDS= (0) indicates that register contains the number 
of doublewords being released. 

is the address of the block of storage being released, 
"laddr" is any address that can be referred to in an LA 
(load address) instruction. LOC=laddr specifies the 
address directly while L0C=(1) indicates the address is 
in register 1. 



r t 

ERR=|laddr| 
I * l 



is the return address if an error 
address that can be referred to 
instruction. The error return 
macro coding error or if there is 
storage. If an asterisk (*) i 
return address is the same as th 
There is no default for this ope 
and an error occurs, the system w 



occurs, "laddr" is any 
by an Li (load address) 
is taken if there is a 

a problem returning the 
s specified, the error 
e normal return address, 
rand. If it is omitted 
ill abend. 



r i 

TYPCALL=|SVC | indicates how control is passed to DMSFRET. Since DMSFRET 
IBALRJ is a nucleus- resident routine, other nucleus-resident 
L J routines can branch directly to it (TYJPCALL=BALR) while 

routines that are not nucleus-resident must use SVC 

linkage (TYPCALL=SVC) . 

When DMSFRET is called, the block being released is placed on the 
appropriate chain. At that point, the final update operation is 
performed, if necessary, to advance FREELOWE, or to move pages from the 
nucleus chain to the corresponding user chain. 

Similar update operations will be performed, when necessary, after 
calls to DMSFREE, as well. 



RELEASING ALLOCATED STORAGE 



Storage allocated by the GETMAIN macro instruction may be released in 
any of the following ways: 

1. A specific block of such storage may be released by means of the 
FREEMAIN macro instruction. 
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2. The STRINIT macro instruction releases 
any previous GETMAIN requests. 



all storage allocated by 



3. Almost all CSS commands issue a STRINIT macro instruction. Thus, 
executing almost any CMS command will cause all GETHAIN storage to 
be released. 

Storage allocated by the DMSFREE macro instruction may be released in, 
any of the following ways: 

1. A specific block of such storage may be released by means of the 
DMSFRET macro instruction. 

2. Whenever any user routine or CMS command abnormally terminates (so 
that the routine DMSABN is entered) , and the abend recovery 
facility of the system is invoked, all DMSFREE storage with 
TYPE=DSER is released automatically. 

Except in the case of abend recovery, storage allocated by the 
DMSFREE macro is never released automatically by the system. 'Thus, 
storage allocated by means of this macro instruction should always be 
released explicitly by means of the DMSFRET macro instruction. 



DMSFREE SERVICE ROUTINES 



The DMSFRES macro instruction is used by the system to request certain 
free storage management services. 

The format of the DMSFRES macro is: 



I [label] 


DMSFRES 


| INIT1 
I INIT2 
| CHECK 
| CKON 
| CKOFF 
I UREC 
I CALOC 


r r n 
|,TYPCALL=|SVC | | 
I IBALRM 

X L J J 


1 



w her e: 

label 

INIT1 



is any valid Assembler language label. 

invokes the first free storage initialization routine, so 
that free storage requests can be made to access the 
system disk. Before INIT1 is invoked, no free storage 
requests may be made. After INIT1 has been invoked, free 
storage requests may be made, but these are subject to 
the following restraints until the second free storage 
management initialization routine has been invoked: 

• All requests for USER type storage are changed to 
requests for NUCLEUS type storage. 

• Error checking is limited before initialization is 
complete. In particular, it is sometimes possible to 
release a block that was never allocated. 
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All requests that are satisfied in high storage nust 
be of a temporary nature, since all storage allocated 
in high storage is released when the second free 
storage initialization routine is invoked. 



When CP's sa 
is saved at 
accessible, 
the size of 
system can 
the first i 
that limited 
initializati 
necessary to 
exercised. 



ved system facility is used 

the point just after the A-D 

It is necessary for DMSFRE 

virtual storage is known, 

be used on any size virtual 

nitialization routine initi 

functions can be requested, 

on routine performs the 

allow the full functions 



, the CHS system 

isk has been made 

to be used before 

since the saved 

machine. Thus, 

alizes DMSFRE so 

while the second 

initialization 

of DHSFRE to be 



INIT2 



CHECK 



CKON 



CKOFF 
UREC 

CALOC 



invokes the second initialization routine. This routine 
is invoked after the size of virtual storage is known, 
and it performs initialization necessary to allow all the 
functions of DMSFRE to be used. The second 
initialization routine performs the following steps: 

• Releases all storage that has been allocated in the 
high storage area* 

• Allocates the FREETAB free storage table. This table 
contains one byte for each 4K page of virtual storage, 
and so cannot be allocated until the size of virtual 
storage is known. 



The FREETAB table is initialized, 
protection keys are initialized. 



and all storage 



• Ml completely unallocated UK pages on the low storage 
nucleus free storage chain are removed to the user 
chain. Any other necessary operations are performed. 

invokes a routine that checks all free storage chains for 
consistency and correctness- Thus, it checks to see 
whether or not any free storage pointers have been 
destroyed. This option can be used at any time for 
system debugging. 

turns on a flag that causes the CHECK routine to be 
invoked each time a call is made to DMSFREE or DMSFRET. 
This can be useful for debugging purposes (for example, 
when you wish to identify the routine that destroyed free 
storage management pointers) . Care should be taken when 
using this option, since the CHECK routine is coded to be 
thorough rather than efficient. Thus, after the CKCN 
option has been invoked, each call to DMSFREE or DHSFRET 
will take much longer to be completed than before. 

turns off the flag that was turned on by the CKON option. 

is used by DMSABN during the abend recovery process to 
release all user storage. 

is used by DMSABN after the abend recovery process has 
been completed. It invokes a routine which returns, in 
register 0, the number of doublewords of free storage 
that have been allocated. This number is used by DMSAEN 
to determine whether or not the abend recovery has been 
successful. 
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TYPCALL=|SVC | indicates how control is passed to DMSFES. Since DMSFRES 
|BALR| is a nucleus-resident routine, other nucleus-resident 
•- J routines can branch directly to it, (TYPCALL=BALR) vhile 

routines that are not nucleus-resident must use SVC 

linkage (TYPCALL=SVC) . 



ERROR CODES FROM DMSFRES, DMSFREE, AND DMSFRET 

A nonzero return code upon return from DMSFRES, DMSFREE, or DHSFRET 
indicates that the request could not be satisfied. Register 15 contains 
this return code, indicating which error has occurred. The following 
codes apply to the DMSFRES, DMSFREE, and DMSFRET macros. 

C ode Error 

1 (DMSFREE) Insufficient storage space is available to satisfy 
the request for free storage. In the case of a variable 
request, even the minimum request could not be satisfied. 

2 (DMSFREE or DMSFRET) User storage pointers destroyed. 

3 (DMSFREE, DMSFRET, or DMSFRES) Nucleus storage pointers 
destroyed. 

4 (DMSFREE) An invalid size was requested. This error exit is 
taken if the requested size is not greater than zero. In the 
case of variable requests, this error exit is taken if the 
minimum request is greater than the maximum request. 
(However, the latter error is not detected if DMSFREE is able 
to satisfy the maximum request.) 

5 (DMSFRET) An invalid size was passed to the DMSFRET macro. 
This error exit is taken if the specified length is not 
positive. 

6 (DMSFRET) The block of storage that is being released was 
never allocated by DMSFREE. Such an error is detected if one 
of the following errors is found: 

• The block does not lie entirely inside either the low 
storage free storage area or the user program area between 
FREELOWE and FREEOPPR. 

• The block crosses a page boundary that separates a page 
allocated for USER storage from a page allocated for 
NUCLEUS type storage. 

• The block overlaps another block already on the free 
storage chain. 

7 (DMSFRET) The address given for the tlock being released is 
not doubleword aligned. 

8 (DMSFRES) An invalid request code was passed to the DMSFRES 
routine. Since all request codes are generated by the DMSFRES 
macro, this error code should never appear. 

9 (DMSFREE, DMSFRET, or DMSFRES) Unexpected and unexplained 
error in the free storage management routine. 



2-24 IBM VM/370 System Logic and Program Determination — Volume 2 



CMS HANDLING OF PSW KEYS 

The purpose of the CHS Nucleus protection Scheie is to protect the CHS 
nucleus from inadvertent destruction by a user program. Without it, it 
would be possible, for example, for a FORTRAN user who accidentally 
assigns an incorrectly subscripted array element to destroy nucleus 
code, wipe out a crucial table or constant area, or even destroy an 
entire disk by destroying the contents of the master file directory. 

In general, user programs and disk-resident CHS commands are executed 
with a PSW key of X'E*, while nucleus code is executed with a PSW key of 
X'O*. 

There are, however, some exceptions to this rule. Certain 
disk-resident CHS commands run with a PSW key of X^', since they have a 
constant need to modify nucleus pointers and storage. The nucleus 
routines called by the GET, POT, READ, and WRITE macros run with a user 
PSW key of X^', to increase efficiency. 

Two macros are available to any routine that wishes to change its PSW 
key for some special purpose. These are the DHSKEY macro and the DMSEXS 
macro. 

The DMSKEY macro may be used to change the PSW key to the user value 
or the nucleus value. The DHSKEY NUCLEUS option causes the current PSW 
key to be placed in a stack, and a value of to be placed in the PSW 
key. The DMSKEY USER option causes the current PSW key to be placed in 
a stack, and a value of x f E s to be placed in the PSW key. The DHSKEY 
RESET option causes the top value in the DHSKEY stack to be removed and 
re-inserted into the PSW. 

It is a requirement of the CMS system that when a routine terminates, 
the DMSKEY stack must be empty. This means that a routine should 
execute a DMSKEY RESET option for each DMSKEY NUCLEUS option and each 
DMSKEY USER option executed by the routine. 

The DMSKEY key stack has a current maximum depth of seven for each 
routine. In this context, a "routine" is anything invoked by an SVC 
call. 

The DMSKEY LASTUSER option causes the current PSW key to be placed in 
the stack, and a new key inserted into the PSW, determined as follows: 
the SVC system save area stack is searched in reverse order (top to 
bottom) for the first save area corresponding to a user routine. The 
PSW key that was in effect in that routine is then taken for the new PSW 
key. (If no user routine is found in the search, then LASTUSER has the 
same effect as USER.) This option is used by OS macro simulation 
routines when they wish to enter a user-supplied exit routine; the exit 
routine is entered with the PSW key of the last user routine on the SVC 
system save area stack. 

The NOSTACK option of DMSKEY may be used with NUCLEUS, USER, or 
LASTUSER (as in, for example, DMSKEY NUCLEUS, NOSTACK) if the current key 
is not to be placed on the DMSKEY stack. If this option is used, then 
no corresponding DMSKEY RESET should be issued. 

The DMSEXS ("execute in system mode") macro instruction is useful in 
situations where a routine is being executed with a user protect key, 
but wishes to execute a single instruction that, for example, sets a bit 
in the NUCON area. The single instruction may be specified as the 
argument to the DMSEXS macro, and that instruction will be executed with 
a system PSW key. 
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Whenever possible, CMS commands are executed with a user protect key. 
This protects the CMS Nucleus in cases where there is an error in the 
system command that would otherwise destroy the nucleus. If the command 
must execute a single instruction or small group of instructions that 
modify nucleus storage, then the DMSKEY or DMSEXS macros are used, so 
that the system PSW key will be used for as short a period of time as is 
possible. 

CMS SVC HANDLING 

DMSITS (INTSVC) is the CMS system SVC handling routine. The general 
operation of DMSITS is as follows: 

1. The SVC new PSW (low storage location X'60*) contains, in the 
address field, the address of DMSITS1. The DMSITS module will be 
entered whenever a supervisor call is executed. 

2. DMSITS allocates a system and user save area. The user save area 
is used as a register save area (or work area) by the called 
routine. 

3. The called routine is called (via a LPSW or EALR) . 

4. Upon return from the called routine, the save areas are released. 

5. Control is returned to the caller (the routine that originally made 
the SVC call) . 

SVC TYPES AND LINKAGE CONVENTIONS 

SVC conventions are important to any discussion of CHS because the 
system is driven by SVCs (supervisor calls) . SVCs 202 and 203 are the 

most common CMS SVCs. 

SVC 202 

SVC 202 is used both for calling nucleus-resident routines, and for 
calling routines written as commands (for example, disk resident 
modules) . 

A typical coding sequence for an SVC 202 call is the following: 

LA R1,PLIST 

SVC 202 

DC AL4 (ERRADD) 

Whenever SVC 202 is called, register 1 must point to a parameter list 
(PLIST) . The format of this parameter list depends upon the actual 
routine or command being called, but the SVC handler will examine the 
first eight bytes of this parameter list to find the name of the routine 
or command being called. 

The "DC AL4 (address) " instruction following the SVC 202 is optional, 
and may be omitted if the programmer does not expect any errors to occur 
in the routine or command being called. If included, an error return is 
made to the address specified in the DC. DMSITS determines whether this 
DC was inserted by examining the byte following the SVC call inline. A 
nonzero byte indicates an instruction, a zero value indicates that "DC 
AL4 (address)" follows. 
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SVC 203 

SVC 203 is called by CMS macros to perform various internal system 
functions. It is used to define SVC calls for which no parameter list 
is provided- For example, DMSFHEE parameters are passed in registers 
and 1. 

A typical calling sequence for an SVC 203 call is as follows: 

SVC 203 

DC H*code» 

The halfword decimal code following the SVC 203 indicates the 
specific routine being called. DMSITS examines this halfword code, 
taking the absolute value of the code by an LPR instruction. The first 
byte of the result is ignored, and the second byte of the resulting 
halfword is used as an index to a branch table. The address of the 
correct routine is loaded, and control is transferred to it. 

It is possible for the address in the SVC 203 index table to be -zero. 
In this case, the index entry will contain an 8-byte routine or command 
name, which will be handled in the same way as the 8-byte name passed in 
the parameter list to an SVC 202. 

The programmer indicates an error return by the sign of the halfword 
code. If an error return is desired, then the cede is negative. If the 
code is positive, then no error return is made. The sign of the 
halfword code has no effect on determining the routine that is to be 
called, since DMSITS takes the absolute value of the code to determine 
the routine called. 

Since only the second byte of the absolute value of the code is 
examined by DMSITS, seven bits (bits 1-7) are available as flags or for 
other uses. Thus, for example, DMSFREE uses these seven bits to 
indicate such things as conditional requests and variable requests. 

When an SVC 203 is invoked, DMSITS stores the halfword code into the 
HOCOH location CODE203, so that the called routine can examine the seven 
bits made available to it. 

All calls made by means of SVC 203 should be made by macros, with the 
macro expansion computing and specifying the correct halfword code. 

Oser-Handled SVCs 

The programmer may use the HNDSVC macro to specify the address of a 
routine that will handle any SVC call other than for SVC 202 and SVC 
203- 

In this case, the linkage conventions are as required by the 
user-specified SVC-handling routine. 

OS and DOS^VS Macro Simulation SVC Calls 

CMS supports selected SVC calls generated by OS and DCS/VS macros, by 
simulating the effect of these macro calls- DMSITS is the initial SVC 
interrupt handler. If the SET DOS command has been issued, a flag in 
N0CON will indicate that DOS/VS macro simulation is to be used. Control 
is then passed to DMSDOS. Otherwise, OS macro simulation is assumed and 
DMSITS passes control to the appropriate OS simulation routine. 
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Invalid SVC Calls 

There are several types of invalid SVC calls recognized by DMSITS. 

1. Invalid SVC number. If the SVC number does not fit into any of the 
four classes described above, then it is not handled by DHSITS. An 
appropriate error message is displayed at the terminal, and control 
is returned directly to the caller. 

2. Invalid routine name in SVC 202 parameter list. If the routine 
named in the SVC 202 parameter list is invalid or cannot be found, 
DMSITS handles the situation in the same way as it handles an error 
return from a legitimate SVC routine. The error code is -3. 

3. Invalid SVC 203 code. If an invalid code follows SVC 203 inline, 
then an error message is displayed, and the abend routine is called 
to terminate execution. 

SEARCH HIERARCHY FOR SVC 202 

When a program issues SVC 202, passing a routine or command name in the 
parameter list, then DMSITS must be searched for the specified routine 
or command. (In the case of SVC 203 with a zero in the table entry for 
the specified index, the same logic must be applied.) 

The search algorithm is as follows: 

1. A check is made to see if there is a routine with the specified 
name currently occupying the system transient area. If this is the 
case, then control is transferred there. 

2. The system function name table is searched, to see if a command by 
this name is a nucleus- resident command. If the search is 
successful, control goes to the specified nucleus routine. 

3. A search is then made for a disk file with the specified name as 
the filename, and MODULE as the filetype. The search is made in 
the standard disk search order. If this search is successful, then 
the specified module is loaded (via the LOADMOD command) , and 
control passes to the storage location now occupied by the command. 

4. If all searches so far have failed, then DMSINA (AEBREV) is called, 
to see if the specified routine name is a valid system abbreviation 
for a system command or function. Oser-defined abbreviations and 
synonyms are also checked. If this search is successful, then 
steps 2 through 4 are repeated with the full function name. 

5. If all searches fail, then an error code of -3 is issued. 

Commands Entered from the Terminal 

When a command is entered from the terminal, DMSINT processes the 
command line, and calls the scan routine to convert it into a parameter 
list consisting of eight-byte entries. The following search is 
performed: 

1. DMSINT searches for a disk file whose filename is the command name, 
and whose filetype is EXEC. If this search is successful, EXEC is 
invoked to process the EXEC file. 
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If not found, the command name is considered to be an abbreviation 
and the appropriate tables are examined. If found, the abbreviation 
is replaced by its full equivalent and the search for an EXEC file 
is repeated. 

2. If there is no EXEC file, DMSINT executes SVC 202, passing the 
scanned parameter list, with the coaaand name in the first eight 
bytes. DMSITS will perfora the search described for SVC 202 in an 
effort to execute the command. 

3. If DMSITS returns to DMSINT with a return code of -3, indicating 
that the search was unsuccessful, then DHSINT uses the CP DIAGNOSE 
facility to attempt to execute the command as a CP command. 

4. If all of these searches fail, then DMSINT displays the error 
message UNKNOWN CP/CMS COMMAND. 

See Figure 4 for a description of this search for a command naae. 

USER AND TRANSIENT PROGRAM AREAS 

Two areas can hold programs that are loaded from disk. These are called 
the user program area and the transient program area. (See Figure 3 for 
a description of CMS storage usage.) A summary of CP, CMS. IPCS, and 
RSCS modules and their attributes, including whether they reside in the 
user program area or the transient area is contained in the IBM/37 0; 
Release 5 Guide. 

The user program area starts at location X^COOO' and extends upward 
to the loader tables. Generally, all user programs and certain system 
commands (such as EDIT, and COPYFILE) are executed in the user program 
area. Since only one program can be executing in the user program area 
at any one time, it is impossible (without unpredictable results) for 
one program being executed. in the user program area to invoke, by means 
of SVC 202, a module that is also intended to te executed in the user 
program area. 

The transient program area is two pages long, extending from location 
X'EOOO 1 to location X^FFF'. It provides an area for system commands 
that may also be invoked from the user program area by means of an SVC 
202 call. When a transient module is called by an SVC, it is normally 
executed with the PSW system mask disabled for I/O and external 
interrupts. 

The transient program area is also used to handle certain OS macro 
simulation SVC calls. OS SVC calls are handled by the OS simulation 
routines located either in the CMSSEG discontiguous shared segment or in 
the user program area, as close to the loader tables as possible. If 
DMSITS cannot find the address of a supported OS SVC handling routine, 
then it loads the file DMSSVT MODULE into the transient area, and lets 
that routine handle the SVC. 

A program being executed in the transient program area may not invoke 
another program intended for execution in the transient program area, 
including OS macro simulation SVC calls that are handled by DMSSVT. For 
example, a program being executed in the transient program area may not 
invoke the RENAME command. In addition, it may not invoke the OS macro 
WTO, which generates an SVC 35, which is handled by DMSSVT. 

DMSITS starts the programs to be executed in the user program area 
enabled for all interrupts but starts the programs to be executed in the 
transient program area disabled for all interrupts. The individual 
program may have to use the SSM (Set System Mask) instruction to change 
the current status of its system mask. 
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Notes: 

1. If the terminal line was actually from an EXEC file, or if the 
command SET IMPEX OFF has been executed, implied EXEC 
is not in effect. 

2. A -3 return code indicates SVC 202 processing did not find 
the command. 

3. If the terminal tine was actually from an EXEC file, or if the 
command SET IMPEX OFF has been executed, implied CP 
is not in effect. 



figure 4. CMS Coniand (and Request) Processing 
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CALLED ROUTINE START-UP TABLE 



Figures 5 and 6 show how the PSW and registers are set up when the 
called routine is entered. 



"Called" Type 



SVC 202 or 203 
- Nucleus 
resident 



SVC 202 or 203 
- Transient 
area MODULE 



SVC 202 or 203 
- User area 



User- handled 



OS - DOS/VS 
Nucleus 
resident 



OS - DOS/VS 
Transient 
! area module 

L 



System Mask 



Disabled 



Disabled 



Enabled 



Enabled 



Disabled 



Disabled 



Storage Key 



System 



User 



User 



User 



lystem 



System 



Problem Bit 



Off 



Off 



Off 



Off 



Off 



Off 



Figure 5. PSW Fields When Called Routine Starts 



Type 



SVC 202 
or 20 3 



Other 



Registers 
- 1 



Same as 
caller 



Same as 
caller 



Registers 
2-11 



Unpre- 
dictable 



Same as 
caller 



Register 
12 



Address 
of 

called 
routine 



Address 
of 
caller 



Register 
13 


Register 
14 


User 
save 
area 


Return 
address 
to 
DMSITS 


User 
save 
area 


Return 
address 
to 
DMSITS 



Register 
15 



Address 
of 

called 
routine 



Same as 
caller 



Figure 6. Register Contents When Called Routine Starts 



RETURNING TO THE CALLING ROUTINE 

When the called routine finishes processing, control is returned to 
DMSITS, which in turn returns control to the calling routine. 



Return Location 

The return is accomplished by leading the original SVC old PSW (which 
was saved at the time DMSITS was first entered) , after possibly 
modifying the address field. The address field modification depends 
upon the type of SVC call, and upon whether or not the called routine 
indicated an error return. 
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For SVC 202 and 203, the called routine indicates a normal return by 
placing a zero in register 15 and an error return by placing a nonzero 
code in register 15. If the called routine indicates a normal return, 
then DMSITS lakes a norial return to the calling routine. If the called 
routine indicates an error return, DMSITS passes the error return to the 
calling routine, if one was specified, and abnorially terminates if none 
was specified. 

For an SVC 202 not followed by "DC AL4 (address) ", a norial return is 
■ade to the instruction following the SVC instruction, and an error 
return causes an abend. For an SVC 202 followed by "DC AL4 (address) ", a 
normal return is made to the instruction following the DC, and an error 
return is iade to the address specified in the DC. In either case, 
register 15 contains the return code passed back by the called routine. 

For an SYC 203 with a positive halfword code, a normal return is iade 
to the instruction following the halfword code, and an error return 
causes an abend. For an SVC 203 with a negative halfword code, both 
normal and error returns are made to the instruction following the 
halfword code. In any case, register 15 contains the return code passed 
tack by the called routine. 

For macro simulation SVC calls, and for user-handled SVC calls, no 
error return is recognized by DMSITS. As a result, DMSITS always 
returns to the calling routine by loading the SVC old PSW, which was 
saved when DMSITS was first entered. 

Re gist er Restor atio n 

Upon entry to DMSITS, all registers are saved as they were when the SVC 
instruction was first executed. Upon exiting from DMSITS, all registers 
are restored from the area in which they were saved at entry. 

The exception to this is register 15 in the case of SVC 202 and 203. 
Upon return to the calling routine, register 15 always contains the 
value that was in register 15 when the called routine returned to DMSITS 
after it had coapleted processing. 

Ca lle d Routine Modifications to System Area 

If the called routine has system status, so that it runs with a PSW 
storage protect key of 0, then it may store new values into the System 
Save Area. 

If the called routine wishes to modify the location to which control 
is to be returned, it must modify the following fields: 

• For SIC 202 and 203, it must modify the NOMRET and ERRET (normal and 
error return address) fields. 

• For other SVCs, it must modify the address field of 0LDPSW. 

To modify the registers that are to be returned to the calling routine, 
the fields EGPR1, EGPR2, ..., EGPR15 must be modified. 

If this action is taken by the called routine, then the SVCTRACE 
facility may print misleading information, since SVCTRACE assumes that 
these fields are exactly as they were when DMSITS was first entered. 
Whenever an SVC call is made, DMSITS allocates two save areas for that 
particular SVC call. Save areas are allocated as needed. For each SVC 
call, a system and user save area are needed. 
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When the SVC-called routine returns, the save areas are not released, 
hut are kept for the next SVC. at the completion of each command, all 
SVC save areas allocated by that command are released. 

The System Save Area is used by DMSITS to save the value of the SVC 
old PSW at the time of the SVC call, the calling routine's registers at 
the time of the call, and any other necessary control information. 
Since SVC calls can be nested, there can be several of these save areas 
at one time. The system save area is allocated in protected free 
storage. 

The user save area contains 12 doublewords (24 words) , allocated in 
unprotected free storage. DMSITS does not use this area at all, but 
simply passes a pointer to this area (via register 13.) The called 
routine can use this area as a temporary work area, or as a register 
save area- There is one user save area for each system save area. The 
OSAVEPTR field in the system save area points to the user save area. 

The exact format of the system save area can be found in the VM^370 
Data Areas and Control Block Logic. The most important fields, and 
their uses, are as follows: 

Field Usage 

CALLER (Fullword) The address of the SVC instruction that resulted in 
this call. 

CALLEE (Doubleword) Eight-byte symbolic name of the called routine. 
For OS and user-handled SVC calls, this field contains a 
character string of the form SVC nnn, where nnn is the SVC 
number in decimal. 

CODE (Halfword) For SVC 203, this field contains the halfword code 
following the SVC instruction line. 

OLDPSW (Doubleword) The SVC old PSW at the time that DMSITS was 
entered. 

HRMRET (Fullword) The address of the calling routine to which control 
is to be passed in the case of a normal return from the called 
routine. 

ERRET (Fullword) The address of the calling routine to which control 
is to be passed in the case of an error return from the called 
routine. 

EGPRS (16 Fullwords, separately labeled EGPRO, EGPR1, EGPR2, EGPR3, 
..., EGPR15) The entry registers. The contents of the 
general registers at entry to DMSITS are stored in these 
fields. 

EFPRS (4 Doublewords, separately labeled EFPRO, EFPR2, EFPR4, EFPR6) 
The entry floating-point registers. The contents of the 
floating-point registers at entry to DMSITS are stored in 
these fields. 

SSAVEHXT (Fullword) The address of the next system save area in the 
chain. This points to the system save area that is being 
used, or will be used, for any SVC call nested in relation to 
the current one. 

SSAVEPRV (Fullword) The address of the previous system save area in 
the chain. This points to the system save area for the SVC 
call in relation to which the current call is nested. 

OSAVEPTR (Fullword) Pointer to the user save area for this SVC call. 
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CMS Interface for Display Terminals 



CMS has an interface that allows it to display large amounts of data in 
a very rapid fashion. This interface for 3270 display terminals (also 
3138, 3148, and 3158) is much faster and has less overhead than the 
normal write because it displays up to 1760 characters in one operation, 
instead of issuing 22 individual writes of 80 characters each (that is 
one write per line on a display terminal) . Data that is displayed in 
the screen output area with this interface is net placed in the console 
spool file. 

The DISPH macro allows you to use this display terminal interface. 
It generates a calling sequence for the CMS display terminal interface 
module, DMSGIO. DMSGIO creates a channel program and issues a DIAGNOSE 
instruction (Code x^ 1 ) to display the data. DHSGIC is a TEXT file 
which must be loaded in order to use DISPW. The format of the CMS DISPW 
macro is: 



r t r i 

[label] | DISPW j bufad |,LINE=n| | ,BYTES=bbbb I 

I jJklMz I I xBYTE SfJ 7 6 1 

L J L "~ J 

[ERASE=YES] [CANCEL=YES] 



where: 

label 



is an optional macro statement label 



bufad 



is the address of a buffer containing the data to be 
written to the display terminal. 



r t 

|LINE=n| 
|LINE=0f 

L J 



is the number of the line, to 23, on the 
display terminal that is to be written. Line 
number is the default. 



r t 

|BYTES=bbbb| is the number of bytes (0 to 1760) to be written 
|BYTES=1760| on the display terminal. 1760 bytes is the default. 

L J 

[ERASE=YES] specifies that the display screen is to be erased before 
the current data is written. The screen is erased 
regardless of the line or number of bytes to be 
displayed. Specifying ERASE=YES causes the screen to go 
into "MORE" status. 

[ CANCEL=YES ] causes the CANCFL operation to be performed: the output 
area is erased. 

Note: It is advisable for the user to save registers before issuing the 
EISPW macro and to restore them after the macro, because neither the 
macro nor its called modules save the user's registers. 
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OS Macro Simulation Under CMS 



When a language processor or a user-written program is executing in the 
CMS environment and using OS-type functions, it is not executing CS 
code. Instead, CMS provides routines that simulate the OS functions 
required to support OS language processors and their generated object 
code. 

CMS functionally simulates the OS macros in a way that presents 
equivalent results to programs executing under CMS. The OS macros are 
supported cnly to the extent stated in the publications for the 
supported language processors, and then only to the extent necessary to 
successfully satisfy the specific requirement of the supervisory 
function. 

The restrictions for COBOL and PL/I program execution listed in 
"Executing a Program that Dses OS Macros" in the VM/370 Planning and 
System Generation Guide exist because of the limited CMS simulation of 
the OS macros. 

Figure 7 shows the OS macro functions that are partially or 
completely simulated, as defined by SVC number. 

OS Data Management Simulation 

The disk format and data base organization of CMS are different from 
those of OS. A CMS file produced by an OS program running under CMS and 
written on a CMS disk, has a different format from that of an OS data 
set produced by the same OS program running under OS and written on an 
OS disk. The data is exactly the same, but its format is different. (An 
OS disk is one that has been formatted by an OS program, such as 
IBCDASDI.) 



HANDLING FILES THAT RESIDE ON CMS DISKS 

CMS can read, write, or update any OS data that resides on a CMS disk. 
By simulating OS macros, CMS simulates the following access methods so 
that OS data organized by these access methods can reside on CMS disks: 

direct identifying a record by a key or by its relative 

position within the data set. 

partitioned seeking a named member within the data set. 

sequential accessing a record in a sequence in relation to 
preceding or following items in the data set- 

Refer to Figure 7 and the "Simulation Notes," then read "Access 
Method Support" to see how CMS handles these access methods. 

Since CMS does not simulate the indexed sequential access method 
(ISAM), no OS program that uses ISAM can execute under CMS. Therefore, 
no program can write an indexed sequential data set on a CMS disk. 
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HANDLING FILES THAT RESIDE ON OS OR DOS DISKS 

By simulating OS macros, CMS can read, but not write or update, CS 
sequential and partitioned data sets that reside on OS disks. Using the 
sane simulated OS macros, CMS can read DOS sequential files that reside 
on DOS disks. The OS macros handle the DOS data as if it were CS data. 
Thus, a DOS sequential file can be used as input to an OS program 
running under CMS. 

However, an OS sequential or partitioned data set that resides on an 
OS disk can be written or updated only by an OS program running in a 
real OS machine. 

CMS can execute programs that read and write VSAM files from CS 
programs written in the VS BASIC, COBOL, or PL/I programming languages. 
This CMS support is based on the DOS/VS Access Method Services and 
Virtual Storage Access Method (VSAM) and, therefore, the OS user is 
limited to those VSAM functions that are available under DOS/VS. 
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Macro 


SVC 


Name 


Number 


XDAP 1 


00 


WAIT 


01 


POST 


02 


EX IT/RET URN 


03 


GETMAIN 


04 


FREEMAIN 


05 


GET POOL 


- 


FREEPOOL 


- 


LINK 


06 


XCTL 


07 


LOAD 


08 


DELETE 


09 


GETMAIN/ 


10 


FREEMAIN 




TIME* 


11 


ABEND 


13 


SPIS 1 


14 


RESTORE^ 


17 


BLDL/FIND 1 


18 


OPEN 


19 


CLOSE 


20 


STOW 1 


21 


OPENJ 


22 


TCLOSE 


23 


DEVTYPE 1 


24 


TRKBAL 


25 


FEOV 


31 


WTO/WTOR 1 


35 


EXTRACT 1 


40 


IDENTIFY 1 


41 


ATTACH 1 


42 


CHAP 1 


44 


TTIMER 1 


46 


STIMER 1 


47 


DEQ 1 


48 


SNAP 1 


51 


ENQ 1 


56 


FREEDBOF 


57 


STAE 


60 


DETACH 1 


62 


CHKPT 1 


63 


RDJFCB 1 


64 


SYNAD 1 


68 


BSP 1 


69 


GET/PUT 


- 


READ/WRITE 


- 


NOTE/POINT 


- 


CHECK 


- 


TGET/TPDT 


93 


TCLEARQ 


94 


STAX 


96 



Function 

Read or write direct access volumes 

Wait for an I/O completion 

Post the I/O completion 

Return from a called phase 

Conditionally acquire user storage 

Release user-acquired storage 

Simulate as SVC 10 

Simulate as SVC 10 

Link control to another phase 

Delete, then link control to another 

load phase 
Read a phase into storage 
Delete a loaded phase 
Manipulate user free storage 

Get the time of day 

Terminate processing 

Allow processing program to 

handle program interrupts 
Effective NOP 
Manipulate simulated partitioned 

data files 
Activate a data file 
Deactivate a data file 
Manipulate partitioned directories 
Activate a data file 
Temporarily deactivate a data file 
Obtain device-type physical 

characteristics 
NOP 

Set forced EOV error code 
Communicate with the terminal 
Effective NOP 
Add entry to loader table 
Effective LINK 
Effective NOP 
Access or cancel timer 
Set timer 
Effective NOP 

Dump specified areas of storage 
Effective NOP 

Release a free storage buffer 
Allow processing program to 

decipher abend conditions 
Effective NOP 
Effective NOP 
Obtain information from FILEDEF 

command 
Handle data set error conditions 
Back up a record on a tape or disk 
Access system-blocked data 
Access system-record data 
Manage data set positioning 
Verify READ/WBITE completion 
Read or write a terminal line 
Clear terminal input queue 
Create an attention exit block 



Simulated in the transient routine DMSSVT. 
routines reside in the nucleus. 



Other simulation 



Figure 7. Simulated OS Supervisor Calls 
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SIMULATION NOTES 



Because CMS has its own file system and is a single-user system 
operating in a virtual machine with virtual storage, there are certain 
restrictions for the simulated OS function in CMS. For example, HIAFCHY 
options and options that are used only by OS multitasking systems are 
ignored by CMS. 

Due to the design of the CMS loader, an XCTL from the explicitly 
loaded phase, followed by a LINK by succeeding phases, may cause 
unpredictable results. 



Listed belcw a 
simulated by CMS 
results that di 
Instructions and 
stated. HIARCHY 
are ignored by 
simulation routin 
6, 7, 8) must be 
COMPSWT is set t 
specify a module 
COMPSWT macrc. 
descriptions cf a 



re descriptions of all the OS 
as seen by the programmer. I 
ffer from those given in 

QS Supervisor Services and 
options and those used only b 
CMS. Validity checking is n 
es. The entry point name in 
a member name or alias in a TX 
o on. If the COMPSWT is on 

name. This switch is turned 
See the VM^/370 CMS Command 
11 CMS user macros. 



macro functions that are 
mplementation and program 
§ 2^t a Management Macro 

Bac£°. Ifi§i£U2ii2Bs are 
y OS multitasking systems 
ot performed within the 
LINK, XCTL, and LOAD (SVC 
TLIB directory unless the 
SVC f> z 1, »Tir1 ft aust 

on and off by using the 
and Macro Reference for 



Macro-SVC_Nc. 
XDAP-SVCO 



WAIT-SVC1 



P0ST-SVC2 



Differences_in_I mplementation 

The TYPE option must be R or W; the V, I, and K 
options are not supported. The BLKREF-ADDR must point 
to an item number acguired by a NOTE macro. Other 
options associated with V, I, cr K are not supported. 

All options of WAIT are supported. The WATT routine 
waits for the completion bit to be set in the 
specified ECBs. 

All options of POST are supported. POST sets a 
completion code and a completion bit in the specified 
SCB. 



EXIT/RETURN 
-SVC3 



Post ECB, execute end of task routines, release 
phase storage, unchain and free latest request block, 
and restore registers depending upon whether this is 
an exit or return from a linked or an attached 
routine. 



GETMAIN-SVC4 



EREEMAIN-SVC5 



LINK-SVC6 



XCTL-SVC7 



All options of GETMAIN are supported except SP and 
HIARCHY, which are ignored by CMS, and LC and LV, 
which will result in abnormal termination if used. 
GETMAIN gets blocks of free storage. 

All options of FREEMAIN are supported except SP, which 
is ignored by CMS, and L, which will result in 
abnormal termination if used. FREEMAIN frees blocks 
of storage acquired by GETMAIN. 

The DCB and HIARCHY options are ignored by CMS. All 
other options of LINK are supported. LINK loads the 
specified program into storage (if necessary) and 
passes control to the specified entry point. 

The DCB and HIARCHY options are ignored by CMS. All 
other options of XCTL are supported. XCTL loads the 
specified program into storage (if necessary) and 
passes control to the specified entry point. 
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Macro- SVC No. 
L0AD-SVC8 



GETPOOL/ 
FREEPOOL 



Differences in Implementation 

The DCB and HIARCHY options are ignored by CMS, All 
other options of LOAD are supported. LOAD loads the 
specified program into storage (if necessary) and 
returns the address of the specified entry point in 
register zero. However, if the specified entry point 
is not in core when SVC 8 is issued, and the 
subroutine contains VCONs that cannot be resolved 
within that TXTLIB member, CBS will attempt to resolve 
these references, and may return another entry point 
address. To insure a correct address in register zero, 
the user should bring such subroutines into core 
either by the CMS LOAD/INCLUDE commands or by a VCCN 
in the user program. 

All the options of GETPOOL and FREEPOOL are supported. 
GETPOOL constructs a buffer pool and stores the 
address of a buffer pool control block in the DCB. 
FREEPOOL frees a buffer pool constructed by GETPOOL. 



DELETE-SVC9 



GETMAIN/ 
FREEMAIN- 
SVC10 



All the options of DELETE are supported. DELETE 
decreases the use count by one and, if the result is 
zero, frees the corresponding virtual storage. Code 4 
is returned in register 15 if the phase is not found. 

All the options of GETMAIN and FREEMAIN are supported 
except SP and HIARCHY, which are ignored by CMS. 



TIME-SVC11 
AEEND-SVC13 



SPIE-SVC14 



All the options of TIME except MIC are supported. 
TIME returns the time of day to the calling program. 

The completion code parameter is supported. The DUME 
parameter is not. If a STAE reguest is outstanding, 
control is given to the proper STAE routine. If a 
STAE routine is not outstanding, a message indicating 
that an abend has occurred is printed on the terminal 
along with the completion code. 

All the options of SPIE are supported. The SPIE 
routine specifies interruption exit routines and 
prograa interruption types that will cause the exit 
routine to receive control. 



REST0RE-SVC17 
ELDL-5VC18 



The RESTORE routine 
control to the user. 



in CMS is 



NOP, 



It returns 



BLDL is an effective NOP for LINKLIBs and JOBLIBs. 
For TXTLIBs and MACLIBs, item numbers are filled in 
the TTR field of the BLDL list; the K, Z, and user 
data fields, as described in QS/VS Data Management 
lacro Instructions, are set to zeros. The "alias" bit 
of the C field is supported, and the remaining bits in 
the C field are set to zero. 



FIND-SVC18 



All the options of FIND are supported. FIND sets the 
read/write pointer to the item number of the specified 
member. 



ST0W-SVC21 



All the options of STOW are supported. The "alias" 
bit is supported, but the user data field is not 
stored in the MACLIB directory since CMS MACLIBs do 
not contain user data fields. 
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Macro-SVC No. 

PEN/0 PEN J-~ 

SYC19/22 



CLOSE/TCLOSE- 
SYC20/23 



Differences in Implement at ion 

All the options of OPEN and OPENJ are supported except 
for the DISP and RDBACK options, which are ignored. 
OPEN creates a CMSCB (if necessary) , completes the 
DCB, and serges necessary fields of the DCB and CMSCB. 

All the options of CLOSE and TCLOSE are supported 
except for the DISP option, which is ignored. The DCB 
is restored to its condition before OPEN. If the 
device type is disk, the file is closed. If the 
device type is tape, the REREAD option is treated as a 
REWIND. 



DEVTYPE-SVC24 



FE0V-SVC31 



n xO/ wfUK-S ¥ C J5 



All the options of DEVTIPE are supported except for 
the RPS option, which is ignored. DEVTYPE aoves 
device characteristic information for a specified data 
set into a specified user area. 



Control is returned to CMS with 
register 15. 



an error code of 4 in 



All options of WTO and WTOR are supported except those 
options concerned with multiple console support. WTO 
displays a message at the operator's console. WTCR 
displays a message at the operator's console, waits 
for a reply, moves the reply to the specified area, 
sets a completion bit in the specified ECB, and 
returns. 



EXTRACT-SVC40 



IDENTIFY-SVC41 



The EXTRACT routine in CMS is essentially a NOP. The 
user- provided answer area is set to zeros and control 
is returned to the user with a return code of 4 in 
register 15. 

The IDENTIFY routine in CMS adds a RPQDEST block to 
the load request chain for the requested name and 
address. 



ATTACH-SVC42 



CHAP-SVC44 



All the options of ATTACH are supported in CMS as in 
OS PCP. The following options are ignored by CMS: 
DCB, LPMOD, DPMOD, HIARCHY, GSPV, GSPL, SHSPV, SHSPL, 
SZERO, PURGE, ASYNCH, and TSSKLIB. ATTACH passes 
control to the routine specified, fills in an ECB 
completion bit if an ECB is specified, passes control 
to an exit routine if one is specified, and returns 
control to the instruction following the ATTACH. 

Since CMS is not a multitasking system, a phase 
requested by the ATTACH macro must return to CMS. 



The CHAP routine in CMS is a NOP. 
to the user. 



It returns control 



TTIMER-SVC46 
STIMER-SVC47 

DEQ-SVC48 



All the options of TTIMER are supported. 

All options of STIMER are supported except for TASK 
and WAIT. The TASK option is treated as if the REAL 
option had been specified, and the WAIT option is 
treated as a NOP; it returns control to the user. 



The DEQ routine 
to the user. 



in CMS is a NOP. It returns control 
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Macro-SVC No. 
SNAP-SVC51 



ENQ-SVC56 
FREEDBUF-SVC57 

STAE-SVC60 



DETACH-SVC62 

CHKPT-SVC63 

RDJFCB-SVC64 



SYNADAF-SYC68 



SYNACRLS-SVC68 



BSP-SVC69 



TGET/TPUT- 
SYC93 



TCLEARQ-SVC94 

STAX-SVC96 

NOTE 



Differences in Iaglementat 
Except for SDATA, PDATA, 
SNAP macro are processed 
are ignored. Processing 
follows. The DBC address 
to verify that the file 
open. If it is not open 
caller with a return code 
then storage is dumped ( 
DUMMY device type) . SNAP 
printer. The dump contai 
and the storage specified. 



ion 



and DCB, all options of the 

normally. SDATA and PDATA 

for the DCB option is as 

specified with SNAP is used 

associated with the DCB is 

control is returned to the 

of 4. If the file is open, 

unless the FCB indicates a 

always dumps output to the 

ns the PSW, the registers. 



The ENQ routine 
to the user. 



in CMS is a NOP. It returns control 



All the options of FREEDBDF are supported. FREEDBDF 
returns a buffer to the buffer pool assigned to the 
specified DCB. 

All the options of STAE are supported except for the 
XCTL option, which is set to XCTL=YES; the PURGE 
option, which is set to HALT; and the ASYNCH option, 
which is set to NO. STAE creates, overlays, or 
cancels a STAE control block as requested. STAE retry 
is not supported. 



The DETACH routine in CMS is a NOP. 
control to the user. 



It returns 



The CHKPT routine is a NOP. 
user. 



It returns control to the 



All the options of RDJFCB are supported. RDJFCB 
causes a Job File Control Block (JFCB) to be read from 
a CMS Control Block (CHSCB) into real storage for each 
data control block specified. CMSCBs are created by 
FILEDEF commands. 

All the options of SYNADAF are supported. SYNADAF 
analyzes an I/O error and creates an error message in 



All the options of SYNADRLS are supported. SYNADRLS 
frees the work area acquired by SYNAD and deletes the 
work area from the save area chain. 

All the options of BSP are supported. BSP decrements 
the item pointer by one block. 

TGET and TPUT operate as if EDIT and WAIT were coded. 
TGET reads a terminal line. TPUT writes a terminal 
line. 

TCLEARQ in CMS clears the input terminal queue and 
returns control to the user. 

Updates a queue of CMTAXEs each of which defines an 
attention exit level. 

All the options of NOTE are supported. NOTE returns 
the item number of the last block read or written. 
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Macro-SVC No. 
POINT 



Differences in Implementation 

All the options of POINT are supported. POINT causes 

the control program to start processing the next read 

or write operation at the specified item number. The 

TTR field in the block address is used as an item 

number. 



CHECK 



All the options of CHECK are supported. CHECK tests 
the I/O operation for errors and exceptional 
conditions. 



DCB 



The following fields of a ICB may be specified, 
relative to the particular access method indicated: 



Operand 


BDAM 


BPAM 


BSAM 


£>SAM 


BFALN 


F,D 


F,D 


F,D 


F,D 


BLKSIZE 


n (number) 


n 


n 


n 


BDFCB 


a (address) 


a 


a 


a 


BUFL 


n 


n 


n 


n 


BUFNO 


n 


n 


n 


n 


DDNAME 


s (symbol) 


s 


s 


s 


DSO&G 


DA 


PO 


PS 


PS 


EODAD 


- 


a 


a 


a 


EXLST 


a 


a 


a 


a 


KEYLEN 


n 


- 


n 


- 


LIHCT 


n 


- 


- 


- 


LRECL 


- 


n 


n 


n 


MACRF 


R,W 


R,W 


R,W, P 


G,P,L,M 


OPTCD 


A,E,F,R 


- 


- 


- 


RECFH 


F,¥,U 


F,V,0 


F,V,B,S,A,M,0 


F,V,B,U,A,M,S 


SINAD 


a 


a 


a 


a 


NCP 


- 


n 


n 


- 



ACCESS METHOD SUPPORT 



The manipulation of data is governed by an access method. To facilitate 
the execution of OS Code under CMS, the processing program must see data 
as OS would present it. For instance, when the processors expect an 
access method to acguire input source cards sequentially, CMS invokes 
specially written routines that simulate the OS sequential access method 
and pass data to the processors in the format that the OS access methods 
would have produced. Therefore, data appears in storage as if it had 
been manipulated using an OS access method. For example, block 
descriptor words (BDW) , buffer pool management, and variable records are 
updated in storage as if an OS access method had processed the data. 
The actual writing to and reading from the I/O device is handled by CKS 
file management. Note that the character string X 1 6VF?fF€>1' is 
interpreted by CMS as an end of file indicator. 

The essential work of the volume table of contents (VTOC) and the 
data set control block (DSCB) is done in CMS by a master file directory 
(MFD) which updates the disk contents, and a file status table (FST) 
(one for each data file) . All disks are formatted in physical blocks of 
800 bytes. 

CMS continues to update the OS format, within its own format, on the 
auxiliary device, for files whose filemode number is 4. That is, the 
block and record descriptor words (BDW and RDW) are written along with 
the data- If a data set consists of blocked records, the data is 
written to, and read from, the I/O device in physical blocks, rather 
than logical records. CMS also simulates the specific methods of 
manipulating data sets. 
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To accomplish this simulation, CHS supports certain essential macros 
for the following access methods: 

• BDAM (direct) — identifying a record by a key or by its 

relative position within the data set. 

« BPAM (partitioned) — seeking a named member within data set. 

• BSAM/QSAM (sequential) — accessing a record in a sequence in 

relation to preceding or following records. 

• VSAM (direct or sequential) — accessing a record sequentially 

or directly by key or address. 

Note: CMS support of OS VSAM files is based on DOS/VS 
Access Method Services and Virtal Storage Access Method 
(VSAM) . Therefore, the OS user is restricted to those 
functions available under " BOS/VS Access Method 
Services." See the section "CMS Support for OS and DCS 
VSAM Functions" for details. 

CMS also updates those portions of the OS control blocks that are 
needed by the OS simulation routines to support a program during 
execution. Most of the simulated supervisory OS control blocks are 
contained in the following two CMS control blocks: 

CMSCVT 

simulates the communication vector table. Location 16 contains 
the address of the CVT control section. 

CMSCB 

is allocated from system free storage whenever a FILEDEF command 
or an OPEN (SVC 19) is issued for a data set. The CMS Control 
Block consists of a file control block (FCB) for the data file, 
and partial simulation of the job file control block (JFCB) , 
input/output block (IOB) , and data extent block (DEB) . 

The data control block (DCB) and the data event control block (DECB) 
are used by the access method simulation routines of CMS. 

Note: The results may be unpredictable if two DCBs access the same data 
set at tae same time. 

The GET and PUT macros are not supported for use with spanned 
records. READ and WRITE are supported for spanned records, provided the 
filemode number is 4, and the data set is physical sequential (BSAM) 
format. 

GET (QSAM) 

All the QSAM options of GET are supported. Substitute mode is 
handled the same as move mode. If the DCBRECFM is FB, the filemode 
number is 4, and the last block is a short block, an EOF indicator 
(X'61FFFF61*) must be present in the last block after the last 
record. 

GET (QISAM) 

QISAM is net supported in CMS. 

PUT (QSAM) 

All the QSAM options of PUT are supported. Substitute mode is 
handled the same as move mode. If the DCBRECFM is FB, the filemode 
number is 4, and the last block is a short blcck, an EOF indicator is 
written in the last block after the last record. 
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POT (QISAM) 

QISAM is not supported in CMS. 

PUTX 

PDTX support is provided only for data sets opened for QSAM-UPDATE 
with simple buffering. 

READ/WRITE (BISAM) 

BISAM is not supported in CBS. 

READ/WRITE (BSAM and BPAM) 

All the BSAM and BPAM options of READ and WRITE are supported except 
for the SE option (read backwards) . 

READ (Offset Read of Keyed BDAM dataset) 

This type of READ is not supported because it is used only for 
spanned records. 

READ/WRITE (BDAM) 

All the BDAM and BSAM (create) options of READ and WRITE are 
supported except for the R and RU options. 

When an input or output error occurs, do not depend on OS sense 
bytes. An error code is supplied by CMS in the ECB in place of the 
sense bytes. These error codes differ for various types of devices and 
their meaning can be found in the IBM VM^370: System Messages , under 
DMS message 120S. 

25£M Restrictions 

The four methods of accessing BDAM records are: 

1. Relative Block RRR 

2. Relative Track TTR 

3. Relative Track and Key TTKey 

4. Actual Address MBBCCHHR 

The restrictions on these access methods are as follows: 

• Only the BDAM identifiers underlined above can be used to refer to 
records, since CMS files have a two-byte record identifier. 

• CMS BDAM files are always created with 255 records on the first 
logical track, and 256 records on all other logical tracks, 
regardless of the block size. If BDAM methods 2, 3, or 4 are used 
and the RECFM is U or V, the BDAM user must either write 255 records 
on the first track and 256 records on every track thereafter, or he 
must not update the track indicator until a NO SPACE FOOUD message is 
returned on a write. For method 3 (WRITE ADD), this message occurs 
when no more dummy records can be found on a WRITE reguest. For 
methods 2 and 4, this will not occur, and the track indicator will be 
updated only when the record indicator reaches 256 and overflows into 
the track indicator. 

• Two files of the same filetype, both of which use keys, cannot be 
open at the same time. If a program that is updating keys does not 
close the file it is updating for some reason, such as a system 
failure or another IPL operation, the original keys for files that 
are not fixed format are saved in a temporary file with the same 
filetype and a filename of $KEYSAVE. To finish the update, run the 
program again. 
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• Once a file is created using keys, additions to the file must not be 
made without using keys and specifying the original length. 

• The number of records in the data set extent must be specified using 
the FILEDEF command. The default size is 50 records. 

• The minimum LRECL for a CMS BDAM file with keys is eight bytes. 



READING OS DATA SETS AND DOS FILES USING OS MACROS 



CMS users can read OS seguential and partitioned data sets that reside 
on OS disks. The CMS MOVEFILE command can be used to manipulate those 
data sets, and the OS QSAM, BPAM, and ESAM macros can he executed under 
CMS to read them. 

The CMS MOVEFILE command and the same OS macros can also be used to 
manipulate and read DOS sequential files that reside on DOS disks. The 
OS macros handle the DOS data as if it were OS data. 



The following OS Release 20.0 BSAM, BPAM, and QSAM 
with CMS to read OS data sets and DOS files: 



tacros can be used 



BLDL 


ENQ 


RDJFCB 


BSP 


FIND 


READ 


CHECK 


GET 


SYNADAF 


CLOSE 


NOTE 


SYNADRLS 


DEQ 


POINT 


WAIT 


DEVTYPE 


POST 





CMS supports the following disk formats for the OS and OS/VS 
sequential and partitioned access methods: 

• Split cylinders 

• User labels 

• Track overflow 

• Alternate tracks 

As in OS, the CMS support of the BSP macro produces a return code of 
4 when attempting to backspace over a tape mark or when a beginning of 
an extent is found on an OS data set or a DOS file. If the data set or 
file contains split cylinders, an attempt to backspace within an extent, 
resulting in a cylinder switch, also produces a return code of 4. 



lh£ ACCESS Command 

Before CMS can read an OS data set or DOS file that resides on a non-CMS 
disk, you must issue the CMS ACCESS command to make the disk on which it 
resides available to CMS. 

The format of the ACCESS command is: 

ACCESS cuu mode[/ext] 

You must not specify options or file identification when accessing an OS 
or DOS disk. 



CMS Introduction 



2-45 



The FILEDEF Command 

You then issue the FILEDEF command to assign a CMS file identification 
to the OS data set or DOS file so that CMS can read it. The format of 
the FILEDEF command used for this purpose is: 




i 

r r n r i 

Flledef | (ddname) | |DISK fn ft |fm|| |DSN ? | 

I ILLN IDSN q1 [q2...]l 

L L JJ L J 

r r n 

DISK |fn ft |fm|| 

\ZIkI Mname I AJ| I 

DDMMY 

r n 

Related Option: | MEMBER membernamel 
| ! j CONCAT ! 

j j L"~ J 

i 



If you are issuing a FILEDEF for a DOS file, note that the OS program 
that will use the DOS file must have a DCB for it. For "ddname" in the 
FILEDEF command line, use the ddname in that DCB. With the DSH operand, 
enter the file- id of the DOS file. 

Sometimes, CMS issues the FILEDEF command for you. Although the CHS 
MOVEFILE command, the supported CMS program product interfaces, and the 
CMS OPEN routine each issue a default FILEDEF, you should issue the 
FILEDEF coaaand yourself to ensure the appropriate file is defined. 

After you have issued the ACCESS and FILEDEF commands for an CS 
sequential or partitioned data set or DOS sequential file, CMS commands 
(such as ASSEMBLE and STATE) can refer to the OS data set or DOS file 
just as if it were a CMS file. 

Several other CMS commands can be used with OS data sets and DCS 
files that do not reside on CMS disks. See the VM/370 CM S Command and 
Macro R efe rence for a complete description of the CMS ACCESS, FILEDEF, 
LISTDS, MOVEFILE, QOERY, RELEASE, and STATE commands. 

For restrictions on reading OS data sets and DOS files under CMS, see 
the VM^370 Planning and System Generation Guide. 

The CMS FILEDEF command allows you to specify the I/O device and the 

file characteristics to be used by a program at execution time. In 

conjunction with the OS simulation scheme, FILEDEF simulates the 
functions of the data definition JCL statement. 

FILEDEF may be used only with programs using OS macros and functions. 
For example: 

filedef filel disk proga data a1 

After issuing this command, your program referring to FILE1 would access 
PROGA DATA on your A-disk. 
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If you wished to supply data from your terminal for FILE1, you could 
issue the command: 

filedef filel terminal 

and enter the data for your program without recompiling. 

fi tapein tap2 (recfm fb Irecl 50 block 100 9track den 800) 

after issuing this command, programs referring to TAPEIN will access a 
tape at virtual address 182. (Each tape unit in the CMS environment has 
a symbolic name associated with it.) The tape must have been previously 
attached to the virtual machine by the VH/370 operator. 



The AOXPROC Option of the FILEDEF Command 



The AUXPROC option can only be used by a program call to FILEDEF and not 
from the terminal. The CMS language interface programs use this feature 
for special I/O handling of certain (utility) data sets. 

The AUXPROC option, followed by a fullword address of an auxiliary 
processing routine, allows that routine to receive control from DMSSEB 
before any device I/O is performed. At the completion of its processing , 
the auxiliary routine returns control to DMSSEB signaling whether or not 
I/O has been performed. If it has not been done, DMSSEB performs the 
appropriate device I/O. 

When control is received from DMSSEB, the general-purpose registers 
contain the following information: 



GPR2 
GPR3 
GPR8 
GPR11 
GPR14 
GPR15 
all other registers 



Data Control Block (DCB) address 

Base register for DMSSEB 

CMS OPSECT address 

File Control Block (FCB) address 

Return address in DMSSEB 

Auxiliary processing routine address 

Work registers 



The auxiliary processing routine must provide a save area in which to 
save the general registers; this routine must also perform the save 
operation. DMSSEB does not provide the address of a save area in 
general register 13, as is usually the case. When control returns to 
DMSfSEB, the general registers must be restored to their original values. 
Control is returned to DMSSEB by branching to the address contained in 
general register 14. 

GPR15 is used by the auxiliary processing routine to inform to DMSSEB 
of the action that has been or should be taken with the data block as 
follows: 

l®3i§t6£ Content Action 

GPR15=0 So I/O performed by AOXPROC routine; DMSSEB will perform I/O. 

GPR15<0 I/O performed by AOXPROC routine and error was encountered. 
DMSSEB will take error action. 

GPR15>0 I/O performed by AOXPROC routine with residual count in GPR15; 
DMSSEB returns normally. 

GPR15=64K I/O performed by AOXPROC routine with zero residual count. 
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DOS/VS Support Under CMS 



CMS supports interactive program development for DOS/VS Release 31, 32 , 
33 and 34. This includes creating, compiling, testing, debugging, and 
executing commercial application programs. The DOS/VS programs can be 
executed in a CMS virtual machine or in a CMS Batch Facility virtual 
machine. 

DOS/VS files and libraries can be read under CBS. VSAM data sets can 
be read and written under CMS. 

The CMS DOS environment (called CMS/DOS) provides many of the same 
facilities that are available in DOS/VS. However, CMS/DOS supports only 
those facilities that are supported by a single (background) partition. 
The DOS/VS facilities supported by CMS/DOS are: 

DOS/VS linkage editor 

Fetch support 

DOS/VS Supervisor and I/O macros 

DOS/VS Supervisor control block support 

Transient area support 

DOS/VS VSAM macros 

This environment is entered each time the CMS SET DOS ON command is 
issued; VSAM functions are available in CMS/DOS only if the SET DOS CN 
(VSAM) command is issued. In the CMS/DOS environment, CMS supports many 
EOS/VS facilities, but does not support OS simulation. When you no 
longer need DOS/VS support under CMS, you issue the SET DOS OFF command 
and DOS/VS facilities are no longer available. 

CMS/DOS can execute programs that use the seguential access method 
(SAM) and virtual storage access method (VSAM) , and can access DOS/VS 
libraries. 

CMS/DOS cannot execute programs that have execution-time 
restrictions, such as programs that use sort exits, teleprocessing 
access methods, or multitasking. DOS/VS COBOL, DOS PL/I, and Assembler 
language programs are executable under CMS/DOS. 

All of the CP and CMS online debugging and testing facilities (such 
as the CP ADSTOP and STORE commands and the CMS DEBUG environment) are 
supported in the CMS/DOS environment. Also, CP disk error recording and 
recovery is supported in CMS/DOS. 

With its support of a CMS/DOS environment, CMS becomes an important 
tool for DOS/VS application program development. Because CHS/DOS was 
designed as a DOS/VS program development tool, it assumes that a DOS/VS 
system exists, and uses it. The following sections describe what is 
supported, and what is not. 



CMS SUPPORT FOR OS AND DOS VSAM FUNCTIONS 

CMS supports interactive program development for OS and DOS programs 
using VSAM. CMS supports VSAM for OS programs written in VS BASIC, 
OS/VS COBOL, or OS PL/I programming languages; or DOS programs written 
in DOS/VS COBOL or DOS PL/I programming languages. CMS does not support 
VSAM for OS or DOS assembler language programs. 
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CMS also supports Access Method Services to manipulate OS and DOS 
VSAM and SAM data sets. 

Under CMS, VSAM data sets can span up to nine DASD volumes. CHS does 
not support VSAM data set sharing; however, CMS already supports the 
sharing of minidisks or full pack minidisks. 

VSAM data sets created in CMS are not in the CMS file format. 
Therefore, CMS commands currently used to manipulate CMS files cannot be 
used for VSAM data sets which are read or written in CHS. A VSAH data 
set created in CMS has a file format that is compatible with OS and DOS 
VSAM data sets. Thus a VSAM data set created in CMS can later be read 
or updated by OS or DOS. 

Because VSAM data sets in CMS are not a part of the CHS file system, 
CMS file size, record length, and minidisk size restrictions do not 
apply. The VSAH data sets are manipulated with Access Hethod Services 
programs executed under CMS, instead of with the CMS file system 
commands. Also, all VSAM minidisks and full packs used in CHS must be 
initialized with the IBCDASDI program; the CMS FORMAT command must not 
be used. 

CMS supports VSAM control blocks with the GEHCB, HCDCB, TESTCB, and 
SHOWCB macros. 

In its support of VSAM data sets, CMS uses RPS (rotational position 
sensing) wherever possible. CMS does not use RPS for 2314/2319 devices, 
or for 3340 devices that do not have the feature. 



Hardware Devices Supported 

Because CMS support of VSAM data sets is based on DOS/VS VSAM and DOS/VS 
Access Method Services, only disks supported by DOS/VS can be used for 
VSAM data sets in CMS. These disks are: 

IBM 2314 Direct Access Storage Facility 

IBM 2319 Disk Storage 

IBM 3330 Disk Storage, Models 1 and 2 

IBM 3330 Disk Storage, Model 11 

IBM 3340 Direct Access Storage Facility 

IBM 3344 Direct Access Storage 

IBM 3350 Direct Access Storage 



CHS Introduction 2-49 



2-50 IBM YM/370 System Logic and Program Determination — Volume 2 



CMS Method of Operation and Program 
Organization 



This section contains the following information: 

• Initialization of the CHS Virtual Machine Environment 

• Processing and Executing CMS Files 

• Handling I/O Operations 

• Simulating Non-CMS Operating Environments 

• Performing Miscellaneous CMS Functions 

The CMS description is in two parts. The first part contains figures 
showing the functional organization of CMS. The second part contains 
general inforiation about the internal structure of CMS programs and 
their interaction with one another. 

CMS program organization is in two figures. Figure 8 is an overview 
of the functional areas of CMS. Each block is numbered and corresponds 
to a more detailed outline of the function found in Figure 9. 
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Initialization of the CMS Virtual Machine 
Environment 



There are four steps involved in initializing a CMS virtual machine: 

• Processing the IPL command for a virtual card reader. 

• Processing the IPL command for a disk device or a named or saved 
system. 

• Processing the first command line entered at the CMS virtual console. 

• Setting up the options for the virtual machine operating environment. 

DMSINI and DMSINS are the two routines that are mainly responsible 

for the one-time initialization process in which the virtual card reader 

is initial program loaded. DMSINI also handles the IPL process when a 
named or saved system is loaded. The CMS command interpreter, DMSINT, 

processes the first line entered from the console as a special case; the 

processing performed by this code is a part of the initialization 

process. DMSSET sets up the user-specified virtual machine environment 

features; DMSQRY allows the user to guery the status of these settings. 

Initialization: Loading a CMS Virtual Machine from 
Card Reader 

When a virtual card reader is specified by the IPL command, for example 
00C, initialization processing begins. Initialization refers to the 
process of loading from a card reader as opposed to reading a nucleus 
from a cylinder of a CMS minidisk or reading a named or shared system 
(description follows) . 

IPL 00C invokes the CMS module DMSINI, which requests that the 
operator enter information such as the address of the DASD where the 
nucleus is to be written, the cylinder address where the write operation 
is to begin, and which version of CMS is to be written (if there is more 
than one to choose from) . 

When all questions are answered, the requested nucleus is written to 
the DASD. 

Once written on the DASD, a copy of the nucleus is read into virtual 
machine storage. One track at a time is read from the disk-resident 
nucleus into virtual storage. DMSINS is then invoked to initialize 
storage constants and to set up the disks and storage space required by 
this virtual machine. 

DMSINS performs three general functions: 

• Initializes storage constants and system tables. 

• Processes IPL command line parameters (SEG= and BATCH) . 

• Initializes for OS SVC processing, in the case where a saved segment 
is not available for use in processing OS simulation requests. 
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INITIALIZES STORAGE CONTENTS AND SYSTEM TABLES 

DMSINS 

Saves the address of this virtual machine in NDCON. 

DMSLAD 

Locates and returns the address of the ADT for this virtual machine. 

DMSFRE 

Allocates free storage to be used during initialization. 

DMSFRE 

Allocates all low free storage so that the system status table 
(SSTAT) will be built in high free storage. 

DMSACM 

Reads the S-disk ADT entry and builds the SSTAT. 

DMSFRE 

Releases the low free storage allocated above (to force SSTAT into 
high storage) so that it can be used again. 

DMSINS 

Stores the address of SSTAT into ASSTAT and ADTFDA in NOCON. 

DMSALU 

Sorts the entries in the SSTAT. 



PROCESSES IPL COMMAND LINE PARAMETERS 

DMSINS 
I Checks for parameters BATCH, and SEG=, or AOTOCR. If BATCH is 
specified, DMSINS sets the flag BATFLAGS. If SEG= is specified, 
DMSINS loops through again to read the segment name. At this point, 
all the parameters on the command line have been scanned. 

If SEG= is specified, the DIAGNOSE 64 FINESYS function is issued 
to determine whether the segment specified on the command line 
exists. If it does, the DCSSAVAL flag is temporarily set. 

I If AOTOCR is specified, a local flag is set so that the subsequent 
I console read may be bypassed and the null line input simulated. This 
I action causes a PROFILE EXEC to be executed. 

DMSINS 

Issues DIAGNOSE 24 to obtain the device type of the console. 

DMSCWR 

Writes the system id message to the console. 

DMSCRD 

Reads the IPL command line from the console. 

DMSSCN 

Puts the IPL command line in PLIST format. 

DMSINS 

If the FINDSYS DIAGNOSE validated the segment name specified on the 
IPL command line, DMSINS issues a DIAGNOSE 64 SAVESYS function for 
that segment. 



2-58 IBM VM/370 System Logic and Program Determination — Volume 2 



DMSINS 

Clears DCSSAVAL and ensures that all the parameters on the command 
line are valid; branches back to label INITLOOP to reprocess for the 
segment just saved. 

DMSINS 

If BATCH is specified, sets BATFLAGS and BATFLAG2 in NOCON. Saves 
the name of the BATCH saved system in SYSNAME in NUCON. 

DMSACC 

Issues ACCESS 195 A to access the batch virtual machine A-disk. 

DHSINS 

Issues DIAGNOSE 60 to get the size of the virtual machine; sets up 
enough storage for this virtual machine, 

DMSINS 

If the DCSSAYAL flag is set, sees if the size of the CMSSEG segment 
overlaps the size of the virtual machine. If this is the case, 
DMSINS sets the flag DCSSOVLP and continues the initialization 
procedure for a CMS virtual machine running without the use of the 
CMSSEG segment, that is, performs time-of-day processing and OS 
initialization. 

If the CMSSEG segment can be used, DMSINS issues the DIAGNOSE 64 
LOADSYS function as the final check to see if the segment is usable. 
If the segment is loaded successfully, it can be used whenever one of 
the functions contained in it is requested. Because it is not 
required immediately, DMSINS issues the DIAGNOSE 64 PURGESYS function 
to purge the segment. 

If the segment cannot be successfully loaded, DMSINS turns off the 
DCSSAVAL flag. 



INITIALIZE OS S?C-HANDLING WITHOUT THE DSE OF THE CMSSEG SEGMENT 

DMSINS 

Checks for the availability of CMSSEG. 

DMSSTT 

Finds and returns the address of DMSSVT, the CMS OS SYC-handler. 

DMSFRE 

Acquires enough free storage to contain DMSSVT. 

DMSLOA 

Loads DMSSVT. 

DMSINS 

Sets the flag DCSSVTLD. 

DMSINS 

If the BATCH virtual machine is not being loaded, determines whether 
there is a PROFILE EXEC or a first command line to be handled. If 
so, issues SVC 202' s to process these commands and passes control to 
DMSINT, the CMS console manager. 

DMSACC 

If the BATCH virtual machine is being initial program loaded, 
accesses the D-disk and passes control to DMSINT, the console 
manager. 
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Initializing a Named or Saved Systems 

A named system is a copy of the nucleus that has been saved and named 
with the CP SAVESYS command. It is faster to IPL a named system than to 
IPL by disk address because CP maintains the named system in page format 
instead of CMS disk format. That is, the saved system is on disk in 
4096-byte blocks instead of 800-byte blocks. The initialization of a 
saved system is also faster because the SSTAT is already built. 

The shared system is a variant of the saved system. In the shared 
system, reentrant portions of the nucleus are placed in storage pages 
that are available to all users of the shared system. Each user has his 
own copy of nonreentrant portions of the nucleus. The shared pages are 
protected by CP, and may not be altered by any virtual machine. 

During DMSINI processing, the virtual machine operator is asked if 
the nucleus must be written (via message DMSINI607R) . If the operator 
answers no, control passes directly to DMSINS to initialize the named or 
saved system specified by the operator in his answer to message 
DMSINI606R. 



Handling the First Command Line Passed to CMS 

DMSINT, the CMS console manager, contains the code to handle commands 
stacked by module DMSINS during initialization processing. DMSINT 
checks for the presence of a stacked command line, and if there is one 
to process, processes it just as it would a command entered during a 
terminal session. That is, DMSINT calls the iAITREAD subroutine and 
issues an SVC 202 to execute the command. When first command processing 
completes, DMSINT receives control to handle commands entered at the 
console for the duration of the session. 

Setting and Querying Virtual Machine Environment 
Options 

DMSSET sets up the virtual machine environment options, as outlined in 
the publication YM/370 CMS Command and Macro Reference. DHSQRY displays 
these settings at the user console. Both of these modules are 
structured and relatively easy to follow, except for some sections of 
DMSSET. 



DMSSET: SET DOS ON (VSAM) PROCESSING 

DMSSET 

(label DOS) If a disk mode is specified on the command line, ensure 
that it is valid. 

DMSLAD 

If the disk mode specified is valid, locates and returns the address 
of the disk. 

DMSSET 

Issues DIAGNOSE 64 FINDSYS to locate the CMSDOS segment. If the 
segment is not already loaded, issues DIAGNOSE 64 LOADSYS to load it. 
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DMSSET 

Sets up the $$B-transient area for use by DOS routines. 

DMSSET 

If SET DOS OFF has been specified, issues the DIAGNOSE 64 PDRGESYS 
function for the CMSDOS segaent and, if VSAH has been loaded, for the 
CMSVSAM segaent. 



DMSSET: SET SYSNAME PROCESSING 

DMSSET 

Determines whether the name of the CMSSEG segment is being changed. 

DMSSET 

Determines whether NONSHARE is specified. If so, the segment may be 
loaded and kept. If NONSHARE is not specified, the segment is purged, 
because it is needed only on demand. 

DMSSET 

Once a new name is placed in the SYSNAMES table replacing CMSSEG, the 

DIAGNOSE 64 FINDSYS function is issued to determine whether the new 

name has been entered correctly. If the FINDSYS is successful, the 

size of the virtual machine is compared to beginning address of the 
segment to determine whether the segment overlays virtual machine 
storage. 

DMSSET 

If the segment can be used (i.e. does not overlay the virtual machine 
storage) the DIAGNOSE 64 LOADSYS function is performed. If the 
LOADSYS executes successfully, control passes to DMSINT, where the 
segment is purged (because it is only needed en demand) . 
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Processing and Executing CMS Files 



As shown in Part 1 of Figure 9, the five general topics form the 
category "Process and Execute CMS Files." Two of these topics are 
discussed in this section: "Maintaining an Interactive Console 
Environment" and "Loading and Executing TEXT files." 



Maintaining an Interactive Console Environment 

Two levels of inforaation are discussed in the following section. The 
first level is a general discussion of how CBS maintains an interactive 
console environment. The second level is a more detailed discussion cf 
the methods of operation mainly responsible for this function. 



Console Management and Command Handling in CMS 

There are two major functions concerned with maintaining an interactive 
terminal environment for CMS: console management and command processing. 
The CMS module that manages the virtual machine console is DMSINT. The 
module responsible for command processing is DMSITS. Many CHS modules 
are called in support of these two functions but the modules in the 
following list are primarily responsible for supporting the functions: 

DMSCRD 

Reads a line from the console. 

DMSCWR 

Writes a line to the console. 

DMSSCN 

Converts a command line to PLIST format. 

DMSINA 

Converts abbreviated commands to their full names. 

DMSCPF 

Passes a command line to CP for execution. 

Maintaining an Interactive Command/Response 
Session 

Three main lines of control maintain the continuity for an interactive 
CMS session: (1) handling of commands passed to DMSINT by the 
initialization module, DMSINS (2) handling of commands entered at the 
console during a session, and (3) handling of commands entered as subset 
commands. The following lists show the main logic paths for first two 
functions. 
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EXECUTE COMMANDS PASSED VIA DMSINS 

DMSINT 

On entry from DMSINA, processes any commands passed via the console 
read put on the user's console by that routine; that is processes 
any commands the user stacks on the line as the first read that 
DMSINT processes. In handling the first read, if that read is null, 
control passes to the main loop of the program, which is described 
in the following section. 

DMSINM 

Get the current time. 

DHSCRD 

Branch to the waitread subroutine to read a command line at the 
console. 

DHSSCN 

Waitread then calls DMSSCN to convert the line just read into plist 
format. Once converted to plist format, an SVC 202 is issued (at 
label INIT1A) to execute the function. This cycle is repeated until 
all stacked commands are executed. 

DMSFNS 

When command execution completes, calls DMSFNS (at label UPDAT) to 
close any files that may have remained open during the command 
processing. 

DMSVSR 

Ensures that any fields set by VSAH processing are reset for CHS. 
Also ensures that the VSAM discontiguous shared segment is purged. 

DMSINT 

Sets up an appropriate status message (CMS, CMS SUBSET, CMS/DOS, 
etc.) . 

DMSCWR 

Writes the status message to the console. 



HANDLE COMMANDS ENTERED DURING A CMS TERMINAL SESSION 

DMSINT 

Branches (from label INLOOP2) to the waitread subroutine to read a 
line entered at the console. 

DMSCRD 

Reads a line entered at the console (subroutine waitread) . 

DMSSCN 

Converts the command line to PLIST format (subroutine waitread) . 

DMSINT 

Determines whether the command line is a null line or a comment. 

DMSLFS 

If the command line is neither a command line nor a comment, 
determines whether the command is an EXEC file. 

DM SIN A (ABBREV) 

Determines whether the command is an abbreviation and, if it is, 
returns its full name. 
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DMSITS 

Passes the command line to DMSITS via an SVC 202. DMSITS is the CMS 
SVC handler. For a detailed description of the SVC handler, see 
"Method of Operation for DMSITS." 

DMSCPF 

If the command could not be executed by the SVC handler, passes the 
command to CP to see if CP can execute it. 

DMSFNS 

On return from processing the command line (label UPDAT) , closes any 
files that may have been opened during processing. 

DMSSMN 

Resets any flags or fields that may have been set during OS 
processing. 

DMSVSR 

Ensures that any fields set for VSAM processing are reset for CMS. 
Also ensures that the VSAM discontiguous shared segment is purged. 

DMSINT 

When the command line has been successfully executed, builds a CMS 
ready message for the user (label PRNREADY) . 

DMSCHR 

Writes the ready message to the console. 

DMSINT 

Returns control to DMSINT at label INL00P2 to continue monitoring the 
CMS terminal session. 



Method of Operation for DMSINT 

DMSINT, the console manager, maintains the continuity of operation of 
the CMS command environment. The main control loop of DMSINT is 
initiated by a call to DMSCRD to get the next command. When the command 
is entered, DMSINT calls DMSINM to initialize the CPU time for the new 
command and then puts it in standard parameter list form by calling the 
scan function program DMSSCN. After calling DMSSCN, DMSINT checks to 
see if an EXEC filetype exists with a filename of the typed-in command. 
(For example, if ABC was typed in, it checks to see if ABC EXEC exists.) 
If the EXEC file does exist, DMSINT adjusts register 1 to point to the 
same command as set up by DMSSCN, but preceded by CLS'EXEC 1 , and then 
issues an SVC 202 to call the corresponding EXEC procedure ('ABC EXEC 
in the example) . 

If no such EXEC file exists for the first word typed in, DMSINT makes 
a further check using the CMS abbreviation-check routine, DMSINA. If, 
for example, the first word typed in had been 'E 1 , DMSINT looks up ■ E» 
via the DMSINA routine. If an equivalent is found for *E', DMSINT looks 
for an EXEC file with the name of the equivalent word (for example, EDIT 
EXEC) ; if such a file is found, DMSINT adjusts register 1 as described 
above to call EXEC and substitutes the equivalent word, EDIT, for the 
first word typed in. Thus, if *E' is a valid abbreviation for 'EDIT 1 
and the user has an EXEC file called EDIT EXEC, he invokes this when he 
merely types in f E* from the terminal. 

If no EXEC file is found either for the entered command name or for 
any equivalent found by DMSINA, DMSINT leaves the terminal command as 
processed by DMSSCN and then issues an SVC 202 tc pass control to DMSITS 
which, in turn, passes control to the appropriate command program. 
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When the command terminates execution, or if DMSITS cannot execute it, 
the return code is passed in register 15. 

A zero return code indicates successful completion of the command. 

A positive return code indicates that the command was completed, but 
with an apparent error; and a negative code returned by DMSITS indicates 
that the typed in command could not be found or executed at all. 

In the last case, DMSINT assumes that the command is a CP command and 
issues a DIAGNOSE instruction to pass the command line to the CP 
environment. If the coimand is not a CP command, DMSINT calls DHSCWR to 
type a message indicating that the command is unknown and the main 
control loop of DMSINT is entered at the beginning. 

If the return code from DMSITS is positive or zero, DMSINT saves the 
return code briefly and calls module DMSAOD to update the Master File 
Directory (MFD) on the user's appropriate user's disk. DMSINT also 
frees the TXTLIB chain and releases pages of storage if reguired. 

After updating the master file directory, DMSINT checks the return 
code that was passed back. If the code is zero, DMSINT types a ready 
message and the processor time used by the given command. Control is 
passed to the beginning of the main control loop of DMSINT. If the 
return code is positive, an error message is typed, along with the 
processor time used. The command caused the typing of an error message 
of the format: DMSxxxnnnt 'text 1 where DMSxxx is the module name, nnn 
is the message identification number, t is the message type, and 'text* 
is the message explaining the error. Control is then passed to the 
beginning of the main control loop. 



Method of Operation for DMSITS 

DMSITS (INTSVC) is the CMS system SVC handling routine. Since CMS is 
SVC driven, the SVC interruption processor is more complex than the 
other interruption processors. 

The general operation of DMSITS is as follows: 

1. The SVC new PSW (low-storage location X^O*) contains, in the 
address field, the address of DMSITS1. Thus, the DMSITS routine is 
entered whenever a supervisor call is executed. 

2. DMSITS allocates a system and user save area, as described below. 
The user save area is a register save area used by the routine, 
which is invoked later as a result of the SVC call. 

3. The called routine is invoked. 

4. Upon return from the called routine, the save areas are 
deallocated. 

5. Control is returned to the caller (the routine which originally 
made the SVC call) . 

The following expands upon various features of the general operation 
that has just been described. 
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TYPES OF SVCS AND LINKAGE CONVENTIONS 

The types of SVC calls recognized by DMSITS, and the linkage conventions 
for each are as follows: 

SVC 201: When a called routine returns control to DMSITS, the user 
storage key may be in the PSH. Because the called routine may also have 
turned on the problem bit in the PSW, the most convenient way for DHSITS 
to restore the system PSH is to cause another interruption, rather than 
to attempt the privileged Load PSW instruction. DHSITS does this by 
issuing SVC 201, which causes a recursive entry into DMSITS. DHSITS 
determines if the interruption was caused by SVC 201, and if so, 
determines if the SVC 201 was from within DHSITS. If both conditions 
are met, control returns to the instruction following the SVC 201 with a 
PSW that has the problem bit off and the system key restored. 

SVC 202: SVC 202 is the most commonly used SVC in the CBS system. It is 
used for calling nucleus resident routines and for calling routines 
written as commands. 

A typical coding seguence for an SVC 202 call is the following: 

LA R1,PLIST 

SVC 202 

DC AL4 (ERRADD) 

Whenever SVC 202 is called, register 1 must point to a parameter list 
(PLIST) . The format of this parameter list depends upon the actual 
routine or command being called, but the SVC handler examines the first 
8 bytes of the list to find the name of the routine or command being 
called. It searches for the routine or module as described for SVC 201. 

The DC ALU (address) following the SVC 202 is opticnal, and may be 
omitted if the programmer does not expect any errors to occur in the 
routine or command being called. DMSITS can determine whether this DC 
was inserted by examining the byte following the SVC call. If it is 
nonzero, then it is an instruction; if it is zero, then it is a "EC 
AL4 (address) ". 

SVC 203: SVC 203 is used by CMS macros to perform various internal 
system functions. SVC 203 is an SVC call for which no parameter list is 
provided. An example is DMSFREE, for which the parameters are passed in 
registers and 1. 

A typical sequence for an SVC 203 call follows: 

SVC 203 

DC H'code* 

The halfword decimal code following the SVC 203 indicates the 
specific routine being called. DMSITS examines this halfword code as 
follows: (1) the absolute value of the code is taken, using an LER 
instruction, (2) the first byte of the result is ignored, and the second 
byte of the resulting halfword is an index into a branch table, (3) the 
address of the correct routine is loaded, and control is transferred 
there, as the called routine. 

It is possible for the address in the SVC 203 index table to be zero. 
In this case, the index entry contains an 8-byte routine or command 
name, which is processed in the same way as the 8-byte name passed in 
the parameter list passed to SVC 202. 
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The sign of the haifword code indicates whether the programmer 
expects an error return; if so, the code is negative: if not, the code 
is positive. Note that the sign of the haifword code has no effect on 
determining the routine which is to be called, because DMSITS takes the 
absolute value of the code to determine the called routine. 

Because only the second byte of the absolute value of the code is 
examined by DMSITS, seven bits (bits 1-7) are available as flags or for 
other uses. For example, DMSFREE uses these seven bits to indicate such 
things as conditional requests and variable requests. Therefore, DMSITS 
considers the codes H'3 1 and H'259 1 to be identical, and handles them 
the same as H'-3' and H'-259', except for error returns. 

When an SVC 203 is invoked, DMSITS stores the haifword code into the 
NDCON location CODE203, so that the called routine can interrogate the 
seven bits made available to it. 

DS ER -HANDLED SVCs: The programmer may use the HNDSVC macro to specify 
the address of a routine that processes any SVC call for SVC numbers 
through 200 and 206 through 255. 

If the HNDSVC macro is used, the linkage conventions are as required 
by the user specified SVC- handling routine. 

There is no way to specify a normal or error return from a 
user-handled SVC routine. 

OS MACRO SIMULATION SVC CALLS: CMS supports certain of the SVC calls 
generated by OS macros, by simulating the effect of these macro calls. 

The proper linkages are set up by the OS macro generations. DMSITS 
does not recognize any way to specify a normal or error return from an 
OS macro simulation SVC call. 

DOS SVC CALLS: All SVC functions supported for CMS/DOS are handled by 
the CMS module DMSDOS. DMSDOS receives control from DMSITS (the CMS SVC 
handler) when that routine intercepts a DOS SVC code and finds that the 
DOSSVC flag in DOSFLAGS is set in NUCON. 

DMSDOS acquires the specified SVC code from the OLDPSW field of the 
current SVC save area. Using this code, DMSDOS computes the address cf 
the routine where the SVC is to be handled. 

Many CMS/DOS routines (including DMSDOS) are contained in a 
discontiguous shared segment (DCSS) . Most SVC cedes are executed within 
DMSDOS, but seme are in separate modules external to DMSDOS. If the SVC 
code requested is external to DMSDOS, its address is computed using a 
table called DCSSTAB; if the code requested is executed within DMSDOS, 
the table SVCTAB is used to compute the address of the code to handle 
the SVC. 

DOS SVC calls are discussed in more detail in "Simulating a DOS 
Environment Under CMS" in this section. 

INVALID SVC CALLS: There are several types of invalid SVC calls 
recognized by DMSITS. These are: 

• Invalid SVC number. If the SVC number does not fit into any of the 
classes described above, it is not handled by DMSITS. An error 
message is displayed at the terminal, and control is returned 
directly to the caller. 

• Invalid routine name in SVC 202 parameter list. If the routine named 
in the SVC 202 parameter list is invalid or cannot be found, then 

CMS Method of Operation and Program Organization 2-67 



DMSITS handles the situation in the same way it handles an error 
return from a legitimate SVC routine. The error code is -3. 

Invalid SVC 203 code. if an illegal code follows SVC 203, an error 
message is displayed, and the ABEND routine is called to terminate 
execution. 



SEARCH HIERARCHY FOR SVC 202 

When a program issues SVC 202, and passes a routine or command name in 
the parameter list, DMSITS must search for the specified routine or 
command. (In the case of SVC 203 with a zero in the table entry for the 
specified index, the same logic must be applied.) 

The search order is as follows: 

1. A check is made to see if there is a routine with the specified 
name currently in the system transient area. If so, then control 
is transferred there. 

2. The system function name table is searched to see if a command by 
this name is nucleus resident. If successful, control goes to the 
specified nucleus routine. 

3. A search is made for a disk file with the specified name as the 
filename, and MODULE as the filetype. The search is made in the 
standard disk search order. If this search is successful, then the 
specified module is loaded by LOADMOD and control passes to the 
storage location now occupied by the command. 

Hm If all searches so far have failed, then DMSINA (ABBREV) is called 
to see if the specified routine name is a valid system abbreviation 
for a system command or function. Oser-defined abbreviations and 
synonyms are checked at the same time. If this search is 
successful, then steps 2 through 4 are repeated with the full 
nonabbreviated name. 

5. If all searches fail, then an error code of -3 is forced. 



USER AND TRANSIENT PROGRAM AREAS 

There are two areas which can hold program modules which are loaded by 
LOADMOD from the disk. These are called the user program area and the 
transient program area. 

The user program area starts at location X^COOO' and extends upward 
to the loader tables. However, the high-address end of that area can be 
allocated as free storage by DMSFREE. Generally, all user programs and 
certain system commands, such as EDIT and COPYFILE, execute in the user 
program area. Because only one program can be executing in the user 
program area at one time, unless it is an overlay structure, it is 
impossible for one program in the user program area to invoke, by means 
of SVC 202, a module which is also intended to execute the user program 
area. 

The transient program area is two pages, running from location 
X'EOOO 1 to location X 1 10000*. It provides an area for system commands 
that may also be invoked from the user program area by means of an SVC 
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202 call. For example, a program in the user program area may invoke 
the RENAME command, because this command is loaded into the transient 
program area. 

The transient program area also handles certain OS macro simulation 
SVC calls. If DMSITS cannot find the address of a supported OS macro 
simulation SVC handling routine, it calls LOADMOD to load the file 
DMSSVT module into the transient area, and lets that routine handle the 
SVC. 

A program in the transient program area may not invoke another 
program intended to execute in the transient program area, including OS 
macro simulation SVC calls that are handled by DMSSVT. Thus, for 
example, a program in the transient program area may not invoke the 
RENAME command. In addition, it may not invoke the OS macro WTO, which 
generates an SVC 35, which is handled by DMSSVT. 

There is one further functional difference between the use of the two 
program areas. DMSITS starts a program in the user program area so 
that it is enabled for all interruptions- It starts a program in the 
transient program area so that it is disabled for all interruptions. 
Thus, the individual program may have to use the SSM (Set System Mask) 
instruction to change the current status of its system mask. 



CALLED ROUTINE START-DP TABLE 



Figures 10 and 11 show how the PSW and registers are set up when the 
called routine is entered. 



Called Type ! 


System 
Mask 


Storage 
Key 


Problem 
! Bit 


SVC 202 or 203 | 
- Nuc resident | 


Disabled 


System 


Off 
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SVC 202 or 203 | 
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User-handled | 
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User 


Off 


OS - Nuc res | 
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System 


Off 


OS - in DMSSVT | 


Disabled 


System 


Off 



Figure 10. PSW Fields when Called Routine is Started 



RETURNING TO THE CALLER 



When the called routine is finished processing it returns control to 
DMSITS, which then must return control to the caller. 

RETURN LOCATION: The return is effected by loading the original SVC old 
PSW (which was saved at the time DMSITS was first entered) , after 
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Figure 11. Register Contents when Called Routine is Started 

possibly modifying the address field. How the address field is modified 
depends upon the type of SVC call, and on whether the called routine 
indicated an error return address. 

For SVC 202 and 203, the called routine indicates a normal return by 
means of a zero returned in register it>, and an error return by means of 
a nonzero in register 15. If the called routine indicates a normal 
return, then DMSITS makes a normal return to the caller. If the called 
routine indicates an error return, then DHSITS returns to the caller's 
error return address, if one was specified, and abnormally terminates if 
none was specified. 

For SVC 202 not followed by "DC AL4 (address) ", a normal return is 
made to the instruction following the SVC instruction, and an error 
return causes an abnormal termination. For SVC 202 followed by "DC 
ALU (address) ", a normal return is made to the instruction following the 
DC, and an error return is made to the address specified in the DC. In 
either case, register 15 contains the return code passed by the called 
routine. 



For SVC 203 with a positive halfword code, a normal return is made 
to the instruction following the halfword code, and an error return 
causes an abnormal termination. For SVC 203 with a 
code, both normal and error returns are made to 
following the halfword code. In any case, register 
return code passed back by the called routine. 



negative halfword 
the instruction 
15 contains the 



For CS macro simulation SVC calls, and for user— handled SVC calls, no 
error return is recognized by DMSITS. As a result, DMSITS always 
returns to the caller by loading the SVC old PSW that was saved when 
DMSITS was first entered. 

REGISTER RESTORATION: Upon entry to DMSITS, all registers are saved as 
they were when the SVC instruction was first executed. Dpon exiting 
from DMSITS, all registers are restored to the values that were saved at 
entry. 

The exception to this is register 15 for SVC 202 and 203. Dpon 
return to the caller, register 15 contains the value that was in 
register 15 when the called routine returned to DMSITS after it had 
completed processing. 



SYSTEM AND OSER SAVE AREA FORMATS 



Whenever an SVC call is made, DMSITS allocates two save areas for that 
particular SVC call. 
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DMSITS uses the system save area (DSECT SSAVE) to save the value of 
the SVC old PSW at the time of the SVC call, the caller's registers at 
the time of the call, and any other necessary control information. 
Since SVC calls can be nested, there can be several of these save areas 
at one time. The system save area is allocated in protected free 
storage. 

The user save area contains (DSECT EXTUAREA) 12 doublewords (24 
f ullwords) , allocated in unprotected free storage. DMSITS does not use 
this area at all, but simply passes to the called routine a pointer to 
this area in register 13. Thus, the called routine can use this area as 
a temporary work area, or as a register save area. There is one user 
save area for each system save area, and the latter contains a pointer 
to the former in the DSAVEPTR field. 



Load and Execute Text Files 

The CMS loader consists of a nucleus resident loader (DMSLDR) , a file 
and message handler program (DMSLIO) , a library search program (DMSLIB) , 
and other subroutine programs. DMSLDR starts loading at the user first 
location (AOSRAREA) specified in NUCON or at a user specified location. 
When performing an INCLUDE function, loading resumes at the next 
available location after the previous LOAD, INCLUDE, or LOADMOD. 

The loader reads in the entire user's program, which consists of one 
or more control sections, each defined by a type BSD record ("card") . 
Each control section contains a type 1 ESD card for each entry point and 
may contain other control cards. 

Once the user's program is in storage, the loader begins to search 
his files for library subprograms called by the program. The loader 
reads the library subprograms into storage, relocating and linking them 
as required. To relocate programs, the loader analyzes information on 
the SLC, ICS, ESD, TXT, and REP cards. To establish linkages, it 
operates on ESD, and RLD cards. Information for end-of-load transfer of 
control is provided by the END and LDT cards, the ENTRY control card, 
START command, or RESET option. 

The loader also analyzes the options specified on the LOAD and 
INCLUDE commands. In response to specified options, the loader can: 

Set the load area to zeros before loading (CLEAR option) . 

Load the program at a specified location (ORIGIN option) . 

Suppress creation of the load-map file on disk (NOMAP option) . 

Suppress the printing of invalid card images in the load map (NOINV 
option) . 

Suppress the printing of REP card images in the load map (NOREP 
option) . 

Load program into "transient area" (ORIGIH TRASS option) . 

Suppress TXTLIB search (NOLIBE option) . 

Suppress text file search (NOAUTO option) . 

Execute the loaded program (START option) . 
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• Type the load nap (TYPE option) . 

• Set the program entry point (RESET option) . 

During its operation, the loader uses a loader table (REFTBL) , and 
external symbol identification table (ESIDTB) , and a location counter 
(LOCCNT) . The loader table contains the names of control sections and 
entry points, their current location, and the relocation factor. (The 
relocation factor is the difference between the compiler-assigned 
address of a control section and the address of the storage location 
where it is actually loaded.) The ESIDTB contains pointers to the 
entries in REFTBL for the control section currently being processed by 
the loader. The loader uses the location counter to determine where the 
control section is to be loaded. Initially, the loader obtains from the 
nucleus constant area the address (LOCCNT) of the next location at 
which to start loading. This value is subsequently incremented by the 
length indicated on an ESD (typeO) , END, or ICS card, or it may be reset 
by an SLC card. 

The loader contains a distinct routine for each type of input card. 
These rouLiiies> jjeifoia calculations using information contained in the 
nucleus constant area, the location counter, the ESIDTB, the loader 
table, and the input cards. Other loader routines perform 
initialization, read cards into storage, handle error conditions, 
provide disk and typewritten output, search libraries, convert 
hexadecimal characters to binary, process end-cf-file conditions, and 
begin execution of programs in core. 

Following are descriptions of the individual subprocessors with LDR. 



SLC CARD ROUTINE 

Fu nc tion 

This routine sets the location counter (LOCCT) to the address 
specified on an SLC card, or to the address assigned (in the REFTBL) 
to a specified symbolic name. 

Entry 

The routine is entered at the first instruction when it receives 
control from the initial and resume loading routine. It is entered 
at 0RG2 whenever a loader routine requires the current address of a 
symbolic location specified on an SLC card. 

Operation 

This routine determines which of the following situations exists, and 
takes the indicated action: 

1. The SLC card does not contain an address or a symbolic name. 
The SLC card routine branches, via BADCRD in the reference table 
search routine, to the disk and type output routine (DHSLIO) , 
which generates an error message. 

2. The SLC card contains an address only. The SLC card routine 
sets the location counter (LOCCT) to that address and returns to 
RD, in the initial and resume loading routine, to read another 
card. 

3. The SLC card contains a name only, and there is a reference 
table entry for that name. The SLC card routine sets LOCCT to 
the current address of that name (at 0RG2) and returns to the 
initial and resume loading routine to get another card. 
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4. The SLC card contains a name only, and there is no reference 
table entry for that name. The SLC card routine branches via 
EHRSLC to the Disk and Type Output routine (DHSLIO) , which 
generates an error message for that name. 

5. The SLC card contains both an address and a name. If there is a 
REFTBL entry for the name, the sum of the current address of the 
name and the address specified on the SLC card is placed in 
LOCCT; control returns to the initial and resume loading routine 
to get another card. If there is no REFTBL entry for the name, 
the SLC card routine branches via ERRSLC to the Disk and Type 
Output routine, which generates an error message for the name. 



ICS CARD ROUTINE - C2AE1 

Function 

This routine establishes a reference table entry for 'the 
control-segment name on the ICS card if no entry for that name 
exists, adjusts the location counter to a fullword boundary, if 
necessary, and adds the card-specified contrcl-segment length to the 
location counter if necessary. 

Entry 

This routine has one entry point, named C2AE1. The routine is 
entered from the initial and resume loading routine when it finds an 
ICS card. 

Operation 

1. The routine begins its operation with a test of card type. If 
the card being processed is not an ICS card, the routine 
branches to the ESD card analysis routine; otherwise, processing 
continues in this routine. 

2. The routine tests for a hexadecimal address on the ICS card. If 
an address is present, the routine links to the DHSLSEA 
subroutine to convert the address to binary, otherwise the 
routine branches via BADCRD to the disk and type output routine 
(DHSLIO) . 

3. The routine next links to the REFTBL search routine, which 
determines whether there is a reference table entry for the 
card-specified control-segment name. If such an entry is found, 
the REFTBL search routine branches to the initial and resume 
loading routine; otherwise, the REFTBL search routine places the 
control-segment name in the reference table, and processing 
continues. 

4. The routine determines whether the card-specified 
contrcl-segment length is zero or greater than zero. If the 
length is zero, the routine places the current location counter 
value in the reference table entry as the control segment's 
starting address (0RG2) , and branches to the initial and resume 
loading routine. If the length is greater than zero, the 
routine sets the current location counter value at a fullword 
boundary address. The routine then places this adjusted current 
location counter value in the reference table entry, adjusts the 
location counter by adding the specified control-segment length 
to it, and branches to RD in the initial and resume loading 
routine to get another card. 
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ESD TYPE CARD ROUTINE - C3AA3 

Function 

This routine creates loader table and ESID table entries for the 
card-specified control section. 

Entry 

This routine has one entry point, location C3AA3. The routine is 
entered from the ESD card analysis routine. 

Operat ion 

1. If this is the first section definition, its ESDID is proved. 

2. This routine first determines whether a loader table (REFTBL) 
entry has already been established for the card-specified 
control section. To do this, the routine links to the REFTBL 
search routine. The ESD type card routine's subsequent 
operation depends on whether there already is a REFTBL entry for 
this control section. If there is such an entry, processing 
continues with operation 5, below; if there is not, the REFTBL 
search routine places the name of this control section in 
REFTBL, and processing continues with operation 3. 

3. The routine obtains the card-specified control section length 
and performs operation 4. 

4. The routine links to location C2AJ1 in the ICS card routine and 
returns to C3AD4 to obtain the current storage address of the 
control section from the REFTBL entry, inserts the REFTBL entry 
position (N - where this is the Nth REFTBL entry) in the 
card-specified ESID table location, and calculates the 
difference between the current (relocated^ address of the 
control section and its card-specified (assembled) address. 
This difference is the relocation factor; it is placed in the 
REFTBL entry for this control section. If previous ESD's have 
been waiting for this CSECT, a branch is taken to SDDEF, where 
the waiting elements are processed. A flag is set in the REFTEL 
entry to indicate a section definition. 

5. The entry found in the REFTBL is examined to determine whether 
it had been defined by a COMMON. If so, it is converted from a 
COMMON to a CSECT and performs operation 3. 

6. If the entry had not been defined previously by an ESD type 0, 
processing continues at 3. 

7. If the entry had been defined previously as other than COMMON, 
DMSLIO is called via ERRORM to print a warning message, 
"DUPLICATE IDENTIFIER". The entry in the ESID table is set 
negative so that the CSECT will be skipped (that is, not loaded) 
by the TXT and RID processing routines. 



ESD TYPE 1 CARD ROUTINE - ENTESD 

Function 

This routine establishes a loader table entry for the entry point 
specified on the ESD card, unless such an entry already exists. 

Entry 

This routine is entered from the ESD card analysis routine. 
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Operation 

1- Branches and links to REFADR to find loader table entry for 
first section definition of the text deck saved by the ESD 
routine. 

2. The routine then adds the relocation factor and the address of 
the ESD found in operation 1 or the address in LOCCNT if an ESD 
has not yet been encountered. The sun is the current storage 
address of the entry point. 

3. The routine links to the REFTBL search routine to find whether 
there is already a REFTBL entry for the card-specified entry 
point name. If such an entry exists, the routine performs 
operation H. If there is no entry, the routine performs 
operation 5. 

4. Upon finding a REFTBL entry that has been previously defined for 
the card-specified name, the routine then compares the 
REFTBL-specified current storage address with the address 
computed in operation 2. If the addresses are different, the 
routine branches and links to the DMSLIO routine (duplicate 
symbol warning) ; if the addresses are the same, the routine 
tranches to location RD in the initial and resume loading 
routine to read another card. Otherwise, it is assumed that the 
REFTBL entry was created as a result of previously encountered 
external references to the entry. The DMSLSBC routine is called 
to resolve the previous external references and adjust the 
REFTBL entry. The entry point name and address are printed by 
calling DMSLIO. 

5. If there is no REFTBL entry for the card-specified entry point 
name, the routine makes such an entry and branches to the DMSLIO 
routine. 



ESD TYPE 2 CARD ROUTINE - C3AH1 

Function 

This routine creates the proper ESID table entry for the 

card-specified external nanse and places the name's assigned address 

(0RG2) in the reference table relocation factor for that name. 

En try 

This routine has two entry points: location C3AH1 and location ESDOO. 
Location C3AH1 is entered from the ESD card analysis routine; this 
occurs when an ESD type 2 card is being processed. Location ESDOO is 
entered from: 

• The ESD card analysis routine, when the card being processed is an 
ESD type 2, and an absolute loading process is indicated. 

• The ESD type card routine and ESD type 1 card routine, as the 
last operation in each of these routines. 

Operation 

1. When this routine is entered at location C3AH1, it first links 
to the REFTBL search routine to determine whether there is a 
REFTBL entry for the card-specified external name. If none is 
found, the REFTBL search routine sets the undefined flag for the 
new loader table entry. 
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2. The routine resets a possible WEAK EXTRH flag. The routine next 
places the REFTBL entry's position-key in the ESID table. If 
the entry has already been defined by leans of an ESD type 0, 1, 
5, or 6, processing continues at operation 4. Otherwise, it 
continues at operation 3. 

3. The relocated address is placed in the RELFAC entry in the 
external name's REFTBL entry. 

4. The ESD type 2 card routine then determines (at location ESDOO) 
whether there is another entry on the ESD card. If there is 
another entry, the routine branches to location CA3A1 in the ESD 
card analysis routine for further processing of this card; 
otherwise, the routine branches to location RD in the initial 
and resume loading routine. 

Exits 

This routine exits to location CA3A1 in the ESD card analysis routine 
if there is another entry on the ESD card being processed, and exits 
to location RD in the initial and resume loading routine if the ESD 
card requires no further processing. 

ESD TYPE 4 ROUTINE - PC 

Function 

This routine makes loader table and ESIDTAE entries for private code 
CSECT. 

Operation 

The ESD Type 4 Card Routine: 

1. The routine LDRSYM is called to generate a unique character 
string number of the form 00000001, which is left in the 
external data area NXTSYM; it is greater in value than 
previously generated symbol. 

2. The CSECT is then processed as a normal type ESD with the 
above assigned name. 

ESD TYPES 5 AND 6 CARD ROUTINE - PRVESD AND COMESD 

Function 

This routine creates reference table and ESIDTAE entries for common and 

pseudo-register ESDs. 

Operation 

The ESD type 5 and 6 card routine: 

1. Links to ESIDINC in the ESD type card routine, to update the 
number of ESIDTB entries. 

2. Links to the REFTBL search routine to determine whether a 
reference table (REFTBL) entry has already been created. If there 
is no entry, the REFTBL search routine places the name of the item 
in the REFTBL. 

3. If the REFTBL search routine had to create an entry for the item, 
the ESD type 5 and 6 card routine indexes it in the ESIDTB, enters 
the length and alignment in the entry, indicates whether it is a 
PR or common, and branches to ESDOO in the ESD type 2 card routine 
to determine whether the card contains additional ESD's to be 
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processed. If the entry is a PR, the ESD type 5 and 6 card 
routine enters its displacement and length in the REFTBL before 
branching to ESDOO. 

4. If the REFTBL already contained an entry, the ESD type 5 and 6 
card routine indexes it in the ESIDTB, checks alignment and 
branches to ESDOO. 

Note: The PR alignment is coded and placed into the REFTBL. It is an 
error to encounter more restrictive alignment PR than previously 
defined. A blank alignment factor is translated to fullword alignment. 



ESD TYPE 10 ROUTINE - WEAK EXTRN 

The WEAK EXTRN routine calls the search routine to find the EXTRN name 
in the loader table. If not found, set the WEAK EXTRN flag in the new 
loader table entry. Exit to ESDOO. 



TXT CARD ROUTINE - C4AA1 

Function 

This routine has two functions: address inspection and placing text 
in storage. 

Entry, 

This routine has three entry points: location C4AA1, which is 
entered from the ESD card analysis routine, and locations REPENT and 
APR1, which are entered from the REP card routine for address 
inspection. 

Operation 

1. This routine begins its operation with a test of card type. If 
the card being processed is not a TXT card, the routine branches 
to the REP card routine; otherwise, processing continues in this 
routine. 

2. The routine then determines how many bytes of text are to be 
placed in storage, and finds whether the loading process is 
absolute or relocating. If the loading process is absolute, the 
routine performs operation 4, below; if relocating, the routine 
performs operation 3. 

3. If the ESIDTB entry was negative, this is a duplicate to CSECT 
and processing branches to RD. Otherwise, the routine links to 
the REFADR routine to obtain the relocation factor of the 
current control segment. 

4* The routine then adds the relocation factor (0, if the loading 
process is absolute) and the card-specified storage address. 
The result is the address at which the text must be stored. 
This routine also determines whether the address is such that 
the text, when loaded starting at that address, overlays the 
loader or the reference table. If a loader overlay or a 
reference table overlay is found, the routine branches to the 
LDRIO routine. If neither condition is detected, the routine 
proceeds with address inspection. 
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5. The routine then determines whether an address has already been 
saved for possible use as the end-of-load branch address. If an 
address has been saved, the routine performs operation 7; if 
not, the routine performs operation 6. 

6. The routine determines whether the text address is below 
location 128. If the address is below location 128, it should 
not be saved for use as a possible end-of-load branch address, 
and the routine performs operation 7; otherwise the routine 
saves the address and then performs operation 7. 

7. The routine then stores the text at the address specified 

(absolute or relocated) and branches to location BD in the 
initial and resume loading routine to read another card. 

Exits 

The routine exits to two locations, as follows: 

1. The routine exits to location RD in the initial and resume 
loading routine if it is being used to process a TXT card. 

2. The routine exits to location APRIL in the REP card routine if 
it is being used for REP card address inspection. 



REP CARD ROUTINE - C4AA3 

Function 

This routine places text corrections in storage. 

Entry 

This routine has one entry point, location C4AA3. The routine is 
entered from the TXT card routine. 

Operation 

1. This routine begins its operation with a test of card type. If 
the card being processed is not a REP card, the routine branches 
to the RLD card routine; otherwise, processing continues in this 
routine. 

2. The routine then links to the HEXB conversion routine to convert 
the REP card-specified correction address froi hexadecimal to 
binary. 

3. The routine then links to the HEXB conversion routine again to 
convert the REP card-specified ESID from hexadecimal to binary. 

4. The routine then determines whether the 2-byte correction being 
processed is the first such correction on the REP card. If it 
is the first correction, the routine performs operation 5; 
otherwise, the routine performs operation 6. 

5. When the routine is processing the first correction, it links to 
location REPENT in the TXT card routine, where the REP 
card-specified correction address is inspected for loader 
overlay and for end-of-load branch address saving; in addition, 
if the loading process is relocating, the relocated address is 
calculated and checked for reference table overlay. The routine 
then performs operation 7. 

6. When the correction being processed is not the first such 
correction on the REP card, the routine branches to location 
APR1 in the TXT card routine for address inspection. 
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7, The routine then links to the HEXB conversion routine to convert 
the correction from hexadecimal to binary, places the correction 
in storage at the absolute (card-specified) or relocated 
address, and determines whether there is another correction 
entry on the REP card. If there is another entry, the routine 
repeats its processing from operation 4, above; otherwise, the 
routine branches to location RD in the initial and resume 
loading routine. 

Exits 

When all the REP-card corrections have been processed, this routine 
exits to location RD in the initial and resume loading routine. 



Mt£ Card Routine - C5AA 1 

Function 

This routine processes RLD cards, which are produced by the assembler 
when it encounters address constants within the program being 
assembled. This routine places the current storage address (absolute 
or relocated) of a given defined symbol or expression into the 
storage location indicated by the assembler. The routine must 
calculate the proper value of the defined symbol or expression and 
the proper address at which tc store that value. 

Entry 

This routine has two entry points, locations C5AA1 and PASSTflO. 

Operation . 

1. Location C5AA1 writes each RLD card into a work file (DMSLDR 
CMSUT1). Exit to RD to process the next card. 

Location PASSTRO reads an RLD card from the work file. At EOF 
got to C6AB6 to finish this file. 

2. The routine uses the relocation header (RH ESID) on the card to 
obtain the current address (absolute or relocated) of the symbol 
referred to by the RLD card. This address is found in the 
relocation factor section of the proper reference table entry. 

xl cue £iii ujxu jlo v/, cue luutiuc jJi.auoucs \.\j cue iii/nj.u luuliuc 

(invalid ESD) . 

3- The routine uses the position header (PH ESID) on the card to 
obtain the relocation factor of the control segment in which the 
DEFINE CONSTANT assembler instruction occurred. If the PH ESID 
is 0, the routine branches to BADCRD in the REFTBL search 
routine (invalid ESID) . If the ESIDTAB entry is negative 
(duplicate CSECT) , the RLD entry is skipped. 

4. The routine next decrements the card-specified byte count by 4 
and tests it for 0. If the count is now 0, the routine branches 
to location RD in the initial and resume loading routine; 
otherwise, processing continues in this routine. 

5. The routine determines the length, in bytes, of the address 
constant referred to in the RLD card. This length is specified 
on the RLD card. 

6. The routine then adds the relocation factor obtained in 
operation 3 (relocation factor of the control segment in which 
the current address of the symbol must be stored) , and the 
card-specified address. The sum is the current address of the 
location at which the symbol address must be stored. 
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7. The routine then computes the arithmetic value (symbol address 
or expression value) that must be placed in storage at the 
address calculated in operation 6, above, and places that value 
at the indicated address. If the value is undefined, the 
routine branches to location DHSLSBB, where the constant is 
added to a string of constants that are to be defined later. 

8. The routine again decrements the byte count of information on 
the RLD card and tests the result for 2ero. If the result is 
zero, go to operation 2; otherwise, processing continues in this 
routine. 



9. 



The routine next checks the continuation flag, a part of the 
data placed on the RLD card by the assembler. If the flag is 
on, the routine repeats its processing for a new address only; 
the processing is repeated from operation 4. If the flag is 
off, the routine repeats its processing for a new symbol; the 
processing is repeated from operation 2. 



Exits 



This routine exits to location RD in the initial and resume loading 
routine. 



EHD CARD ROUTINE - C6AA1 

F uncti on 

This routine saves the END card address under certain circumstances, 
and initializes the loader to load another control segment. 

En try 

This routine has one entry point, location C6AA1. The routine is 
entered from the RLD card routine. 

Operation 

1. This routine begins its operation with a test of card type. If 
the card being processed is not an END card, the routine 
branches to the LDT card routine; otherwise, processing 
continues in this routine. 

2. The routine then determines whether the END card contains an 
address. If the card contains no address, the routine performs 
operation 7, below; otherwise, the routine performs operation 3. 

3. The routine next checks the end-address-saved switch. If this 
switch is on, an address has already been saved, and the routine 
performs operation 7. If the switch is off, the routine 
performs operation 4. 

4. The routine determines whether loading is absolute or relocated. 
If the loading process is absolute, the routine performs 
operation 6; otherwise, the routine performs operation 5. 

5. The routine links to the REFADR routine to obtain the current 
relocation factor, and adds this factor to the card-specified 
address. 

6. The routine stores the address (absolute or relocated) in area 
BRAD, for possible use at the end-of-load transfer of control to 
the problem program. 

2-80 IBM VM/370 System Logic and Program Determination — Volume 2 



7. Goes to location PASSTWO (in RLD routine) to process RLD cards. 

8. The routine then clears the ESID table, sets the absolute load 
flag on, and branches to the location specified in a general 
register (see "Exits") . 

Exits 

This routine exits to the location specified in a general register. 
This say be either of two locations: 

1. Location RD in the initial and resume loading routine. This 
exit occurs when the END card routine is processing an END card. 

2. The location in the LDT card routine that is specified by that 
routine* s linkage to the END card routine. This exit occurs 
when the LDT card routine entered this routine to clear the ESID 
table and set the absolute load flag on. 



CONTROL CARD ROUTINE - CTLCRD1 



Function 

This routine handles the ENTRY and LIBRARY control cards. 

Entry 

This routine has one entry point, location CTLCRD1. The routine is 
entered from the LDT card routine. 

O per atio ns 

1. The CMS function SCAN is called to parse the card. 

2. If the card is not an ENTRY or LIBRARY card, the routine 
determines whether the NOINV option (no printing of invalid card 
images) was specified. If printing is suppressed, control 
passes to RD in the initial and resume loading routine, where 
another card is read. If printing is not suppressed, control 
passes to the disk and type output routine (DMSLIO) , where the 
invalid card image is printed in the load map. If the card is a 
valid control card, processing continues. 

ENTRY Card 

3. If the ENTRY name is already defined in REFTBL, its REFTBL 
address is placed in ENTADR. Otherwise, a new entry is made in 
REFTBL, indicating an undefined external reference (to be 
resolved by later input or library search) , and this REFTBL 
entry 1 s address is placed in ENTADR. 

4. The control card is printed by calling DMSLIO via CTLCRD; it 
then exits to RD. 

LIBRARY Card 

5. Only nonobligatory reference LIBRARY cards are handled; any 
others are considered invalid. 

6. Each entry-point name is individually isolated and is searched 
for in the REFTBL. If it has already been loaded and defined, 
nothing is done and the next entry-point name is processed. 
Otherwise, the nonobligatory bit is set in the flag byte of the 
REFTBL entry. 

7. Processing continues at operation 4. 
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REFADR ROUTINE (DMSLDRB) 

Function 

This routine computes the storage address of a given entry in the 
reference table. 

Entry 

This routine has one entry point, location REFADR. The routine is 
entered for several of the routines within the loader. 

Op er ation 

1. Checks to see if requested ESDID is zero. If so, uses LOCCNT as 
requested location; branches to the return location + 44; 
otherwise continues this routine. 

2. The routine first obtains, from the indicated ESID table entry, 
the position (n) of the given entry within the reference table 

'yh?r? the ^iven entr v is the nth REFTBL entr v * 

3. The routine then multiplies n by 16 (the number of bytes in each 
REFTBL entry) and subtracts this result from the starting 
address of the reference table. The starting address of the 
reference table is held in area TBLREF; this address is the 
highest address in storage, and the reference table is always 
built downward from that address. 

4. The result of the subtraction in operation 2, above, is the 
storage address of the given reference table entry. If there is 
no ESD for the entry, goes to operation 5; otherwise, this 
routine returns to the location specified by the calling 
routine. 

5. Adds an element to the chain of waiting elements. The element 
contains the ESD data item information to be resolved when the 
requested ESDID is encountered. 



PRSERCH ROUTINE (DMSLDRD) 

Function 

This routine compares each reference table entry name with the given 
name determining (1) whether there is an entry for that name and (2) 
what the storage address of that entry is. 

Entry. 

This routine is initially entered at PRSERCH, and subsequently at 
location SERCH. The routine is entered from several routines within 
the loader. 

Operation 

1. This routine begins its operation by obtaining the number of 

entries currently in the reference table (this number is 

contained in area TBLCT) , the size of a reference table entry 

(16 bytes) , and the starting address of the reference table 
(always the highest address in storage, contained in area 
TBLREF) . 
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2. The routine then checks the number of entries in the reference 
table. If the number is zero, the routine performs operation 5; 
otherwise, the routine performs operation 3. 

3. The routine next determines the address of the first (or next) 
reference table entry to have its name checked, increments by 
one the count it is keeping of name comparisons, and compares 
the given name with the name contained in that entry. If the 
names are identical, PRSERCH branches to the location specified 
in the routine that linked to it- PRSERCH then returns the 
address of the REFTBL entry; else PRSERCE performs operation 4. 

4. The routine then determines whether there is another reference 
table entry to be checked. If there is none, the routine 
performs operation 5; if there is another, the routine 
decrements by one the number of entries remaining and repeats 
its operation starting with operation 3. 

5. If all the entries have been checked, and none contains the 
given name for which this routine is searching, the routine 
increments by one the count it is keeping of name comparisons, 
places that new value in area TBLCT, moves the given name to 
form a new reference table entry, and returns to the calling 
program. 



Exits 



This routine exits to either of two locations, both of which are 
specified by the routine that linked to this routine. The first 
location is that specified in the event that an entry for the given 
name is found % the second location is that specified in the event 
that such as entry is not found. 



LOADER DATA BASES 



ESD Card Codes (col. 25.-.) 



Code 


Meaning 


00 


SD (CSECT or START) 


01 


LD (ENTRY) 


02 


ER (EXTRN) 


04 


PC (Private code) 


05 


CM (COMMON) 


06 


XD (Pseudo-register) 


0A 


WX (WEAK EXTERN) 



ESIDTB ENTRY 



The ESD ID table (ESIDTB) is constructed separately for each text deck 
processed by the loader. The ESIDTB produces a correspondence between 
ESD ID numbers (used on RLD cards) and entries in the loader reference 
table (REFTBL) as specified by the ESD cards. Thus, the ESIDTB is 
constructed while processing the ESD cards. It is then used to process 
the TXT and RLD cards in the text deck. 

The ESIDTB is treated as an array and is accessed by using the ID 
number as an index. Each ESIDTB entry is 16 bits long. 
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Bits 




1 

2 
3 
4-15 



Me aning 

If 1, this entry corresponds to a CSECT that has been previously 
defined. All TXT cards and RLD cards referring to this CSECT in 
this text deck should be ignored. 

If 1, this entry corresponds to a CSECT definition (SD) . 

Waiting ESD items exist for this ESDID. 

Unused. 

REFTBL entry number (for example 1, 2, 3, etc.) 



Bit 1 is very crucial because it is necessary to use the VALUE field 
of the REFTBL if the ID corresponds to an ER, CM, or PR; but, the INFO 
field of the REFTBL entry must be used in the ID corresponds to an SD. 






1 0(0) I 

1 NAMF 1 




18(8) |9(9) | 
I FLAG1 | INFO | 


M2(C) 113(D) | 
| NOTE1 | VALUE | 


116(10) 117(11) | 
I FLAG2 | ADDRESS | 

L — „_ ... ._ _ _ _ 1 



A REFTBL entry is 20 bytes. The fields have the following uses: 
NAME Field: Contains the symbolic name from the ESD data item. 



FLAG1 


BYTE 




Loader 


ESD 


Routine 


Code 
7C 


Code 
00 


Label 
XBYTE 


7D 


01 


XHALF 


7E 


03 


XFULL 


7F 


07 


XDBL 


80 


05 


XUNDEF 


81 


04 


XCXD 


82 


02 


XCOMSET 


83 


05 


WEAKEXT 


90 


06 


CTLLIB 



Meaning 

PR - byte alignment 

PR - halfword alignment 

PR - fullword alignment 

PR - doubleword alignment 

Undefined symbol 

Resolve CXD 

Define common area 

Weak external reference 

TXTLIBs not to be used to resolve names 



INFO Field: Depends upon the type of the ESD item 



ESD Item 

Ty.£e 

SD (CSECT or START) 

LD (ENTRY) 

CM (COMMON) 

PR (Psuedo Register) 



INFO Field 

Meaning 

Relocation factor 

Zero 

Maximum length 
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VALUE Field: depends upon the type of the ESD item, as does the INFO 
field. 

ESD Item 7ALUE Field 

lI2e Meaning 

SD (CSECT or START) Absolue address 

LD (ENTRY) Absolue address 

CM (COMMON) Absolue address 

PR (Pseudo register) Assigned value 

(starting from 0) 

FLAG2 Byte 

Bit Meaning Bit Me a ning 

Unused 4 Unused 

1 Unused 5 Name was located in a TXTLIB 

2 Unused 6 Section definition entry 

3 Unused 7 Name specifically loaded from command line. 

ADDRESS Field: Unused 

Entries lay be created in the loader reference table prior to the 
actual defining of the symbol. For example, an entry is created for a 
symbol if it is referenced by means of an EXTRN (ER) even if the symbol 
has not yet been defined or its type known. Furthermore, common (CM) is 
not assigned absolute addresses until prior to the start of execution by 
the START command. 

These circumstances are determined by the setting of the flag byte; 
if the symbol's value has not yet been defined, the value field 
specifies the address of a patch control block (PCB) . 



PATCH CONTROL BLOCK (PCB) 

These are allocated from free storage and pointed at from REFTBL entries 
or other PCBs. 

Byte Meaning 

\J *J nuu^ coo v j- u^Saw ^ vw 

5-7 Location of ADCON in storage 

4 Flag byte 

All address constant locations in loaded program for undefined symbols 
are placed on PCB chains. 



LOADER INPUT RESTRICTIONS 

All restrictions which apply to object files for the OS linkage editor 
apply to CMS loader input files. 

Processing Commands that Manipulate the File 
System 

Figure 9 lists the CMS modules that perform either general file system 
support functions or that perform data manipulation. 
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Managing the CMS File System 



A description of the structure of the CBS file system and 
routines that access and update the file system follows. 



the flow of 



How CMS Files Are Organized in Storage 

CMS files are organized in storage by three types of data blocks: the 
file status table (FST) , chain links, and file records. Figure 12 shows 
how these types of data blocks relate to each other; the following text 
and figures describe these relationships and the individual data blocks 
in more detail. 



FILE STATUS TABLES 



CMS files consist of 800-byte records whose attributes are described in 
the file status table (FST) . The file status table is defined by DSECT 
FSTSECT. The FST consists of such information as the filename, 
filetype, and filemode of the file, the date on which the file was last 
written, and whether the file is in fixed-length or variable format. 
Also, the FST contains a pointer to the first chain link. The first 
chain link is a block that contains addresses cf the data blocks that 
contain the actual data for the file. 

The FSTs are grouped into 800-byte blocks called FST Blocks (these 
are sometimes referred to in listings as hyperblocks) . Each FST block 
contains 20 FST entries, each describing the attributes of a separate 
file. Figure 13 shows the structure of an FST block and the fields 
defined in the FST. 



File Status 
Table Block (FSTB) 




File Status 
Table Entry 







FCL 










-f f- 



Nth Chain 
Link (NCL) 



-800-byte CMS Record Containing Fi!e Data Items- 



Figure 12. How CMS File Records Are Chained Together 
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^ 



File Status 
Table Block 



FST1 



FST2 



FST4 



FST5 



t-b I b 



FST20 






Si 



Fields in a File 
Status Table Entry 






FILE 


- 




NAME 


8 


FILE 






TYPE 




16 


DATE L AST W R I TT E N 




20 


Write Pointer 
(Number of Item) 


22 Read Pointer 

(Number of Item) 


24 


Filemode 


26 Number of 
Items in File 


28 


Disk Address 
of 1st Chain Link 


30 Fixed 
Variable 


31 Flag 
Byte 


32 


Item Length (F) 
Max. Item Length (V) 




36 


Number of 

800-Byte Data Blocks 

... 


Year 


,. 



Figure 13. Format of a File Status Block; Format of a File Status Table 



CHAIN LINKS 



Chain links are 200- or 800-byte blocks of storage that chain the 
records of a file in storage. There are two types of chain links: first 
chain links and Nth chain links. 

The first chain link points to two kinds of data. The first 80 bytes 
of the first chain link contain the halfword addresses of the remaining 
40 chain links used to chain the records of the file. The next 120 
bytes of the file are the halfword addresses of the first 60 records of 
the file. 

The Nth chain links contain only halfword addresses of the records 
contained in the file. 

Because there are 41 chain links (of which the first contains 
addresses for only 60 records) , the maximum size for any CHS file is 
16,060 800-byte records. 
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CHS RECORD FORMATS 

CMS records are 800-byte blocks containing the data that comprises the 
file. For example, the CMS record may contain several card images cr 
print images, each of which is referred to a record item. Figure 14 
shows how chain links are chained together. 

CMS records can be stored on disk in either fixed-length or 
variable-length format. However, the two formats may not be mixed in a 
single file. 

Regardless of their format, the items of a file are stored by CMS in 
sequential order in as many 800-byte records as are required to 
accommodate them. Each record (except the last) is completely filled 
and items that begin in one record can end on the next record. Figure 
15 shows the arrangement of records in files for files containing 
fixed-length records and files containing variable-length records. 

The location of any item in a file containing fixed-length records is 
determined by the formula: 



(Item Number - 1) x Record Length 

locations = 

800 



where the quotient is the number of the item and the remainder is the 
displacement of the item into the file. 

For variable- length records, each record is preceded by a 2-byte 
field specifying the length of the record. 



Disk Organization 

CMS virtual disks (also referred to as minidisks) are blocks of data 
designed to externally parallel the function of real disks. Several 
virtual disks may reside on one real disk. 

A CMS virtual machine may have up to 10 virtual disks accessed during 
a terminal session, depending on user specifications. Some disks, such 
as the S-disk, are accessed during CMS initiali2ation; however, most are 
accessed dynamically as they are needed during a terminal session. 



PHYSICAL ORGANIZATION OF VIRTUAL DISKS 

Virtual disks are physically organized in 8C0-byte records. Records 1 
and 2 of each user disk are reserved for IPL. Record 3 contains the disk 
label. Record 4 contains the master file directory. The remaining 
records on the disk contain user file-related information such as the 
FSTs, chain links, and the individual file records discussed above. 
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Disk Address of 
2nd Chain Link 

Disk Address of 
3rd Cham Link 



Disk Address of 
40th Chain Link 



Disk Address of 
41st Chain Link 



Disk Address of 
1st Data Block 



Disk Address of 
2nd Data Block 



Disk Address of 
59th Data Block 



Disk Address of 
60th Data Block 



Cham 
) Linkage 
Directory 



Disk Address of 
At 0th Data Block 



Disk Address of 
A^ 1st Data Block 



Disk Address of 
ft 398 th Data Block 



Disk Address of 
^+ 399th Data Block 



ft- (n-2) • 400 * 

where n = Cha 



Link Number 



Figure 14. Format of the First Chain Link and Nth Chain Links 



Data block structure for file consisting of fixed-length records 



800 



800 



800 



1st record 



2nd record 



3rd record 



4th record 



5th record 



800 



800 



800 



Data block structure for file consisting of variable-length records 



800 



i __H 



800 



800 



1st record 



800 



2nd record 
L 3 | 3rd record L 4j 

4th record 



K] 



5th record 



800 

800 



Figure 15. Arrangement of Fixed-Length Records and Variable-Length 
Records in Files 
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THE MASTER FILE DIRECTORY 

The master file directory (MFD) is the major file management table for a 
virtual disk. As mentioned earlier, it resides on cylinder 0, track 0, 
record 4 of each virtual disk. Six types of information contained in 
the master file directory: 

• The disk addresses of the FST entries describing user files on that 
disk. 

• A 4-fcyte "sentinel," which can be either FFFD or FFFF. FFFD 
specifies that extensions of the QMSK (described below) follow. FFFF 
specifies that no QMSK extensions follow. 

• Extensions to the QMSK, if any. 

• General information describing the status of the disk: 

ADTNOM — The total number of 800-byte blocks on the user's disk. 
ADTDSED — The number of blocks currently in use on the disk. 

- ADTLEFT — Number of blocks remaining for use (ADTNOM - ADTOSED) . 

ADTLAST — Relative byte address of the last record in use on the 
disk. 

ADTCYL — Number of cylinders on the user's disk. 

- Unit Type — A 1-byte field describing the type of the disk: 08 
for a 2314, 09 for a 3330. 

A bit mask called the QMSK, which keeps track of the status of the 
records on disk. The QMSK is described in more detail below. 

Another bit map, called the QQMSK, which is used only for 2314 
disks and performs a function similar to that of QMSK. 

Figure 16 shows the structure of the master file directory. Figure 
12 shows the relationship of the Master File Directory, which resides on 
disk, to data blocks brought into storage for file management purposes, 
for example, FSTs and chain links. 



KEEPING TRACK OF READ/WRITE DISK STORAGE: QMSK AND QQMSK 

Because large areas of disk space need not be contiguous in CMS, but are 
composed of 800-byte blocks chain-linked together, disk space management 
needs to determine only the availability of blocks, not extents. The 
status of the blocks on any read/write disk (which blocks are available 
and which are currently in use) is stored in a table called QMSK. The 
term QMSK is derived from the fact that a 2311 disk drive has four 
800-byte blocks per track. One block is a "quarter-track", or QTRK, and 
a 200-byte area is a "guarter-guarter-track", or QQTRK. The bit mask 
for 2314, 2319, 3340, or 3330 records is called the QMSK, although each 
800-byte block represents less than a quarter of a track on these 
devices. 



2-90 IBM VM/370 System Logic and Program Determination — Volume 2 



On a 2314 or 2319 disk, the blocks are actually grouped fifteen 
800-byte blocks per even/odd pair of tracks. An even/odd pair of tracks 
is called a track group- On a 3330 disk, the blocks are grouped 
fourteen 800-byte blocks per track. On a 3340 disk, the blocks are 
grouped into eight 800-byte blocks per track. 

When the systea is not in use, a user's QMSK resides on the Master 
File Directory; during a session it is maintained on disk, but also 
resides in real storage. QMSK is of variable length, depending on how 
many cylinders exist on the disk. 

Each bit is associated with a particular block on the disk. The 
first bit in QMSK corresponds to the first block, the second bit to the 
second block, and so forth, as shown in Figure 17. 

When a bit in QMSK is set to 1, it indicates that the corresponding 
block is in use and not available for allocation. A 0-bit indicates 
that the corresponding block is available. The data blocks are referred 
to by relative block numbers throughout disk space management, and the 
disk I/O routine, DMSDIO, finally converts this number to a CCHHR disk 
address. 

A table called QQMSK indicates which 200 byte segments (QQTSK) are 
available for allocation and which are currently in use. QQMSK contains 
100 entries, which are used to indicate the status of up to 100 QQTHK 
records. An entry in QQMSK contains either a disk address, pointing to 
a QQTHK record that is available for allocation, or zero. QQMSK is used 
only for 2314 files; for 3330, 3340, and 3350, the first chain link 
occupies the first 200- byte area of an 800-byte block. 

The QMSK and QQMSK tables for read-only disks are not brought into 
storage, since no space allocation is done for a disk while it is 
read-only. They remain, as is, on the disk until the disk is accessed 
as a read/write disk. 
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2 Bytes 



ByteO 



Disk Address of 1st FST Block 



Disk Address of 2nd FST Block (if any) 



Disk Address of Nth FST Block (if any) 



Sentinel 



Disk Address of 1st QMSK extension (if any) 



Disk Address of Nth QMSK extension (if any) 



Not used — Zero filled 



Byte 364 




ADTNUM, ADTUSED, ADTLEFT, ADTLAST 
(4 bytes each) 



Not used (zero) 



ADTCYL 



First 215 Bytes of QMSK 



UNIT-TYPE 



Entire 200-Byte QQMSK Table 
(for 2314 only) 



Figure 16. Structure of the Master File Directory 



OMSK for 2314 or 2319 



H Tl bit 

_5_J? 



where: 

C = Cylinder 
H= Head 
R = Record 



Bit Value Meaning 



QMSK for 3330 



Block available - - 

1 Block in use 



u 

















n 


n 


























1 
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Figure 17. Disk Storage Allocation Using the QMSK Data Block 
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DYNAMIC STORAGE MANAGEMENT: ACTIVE DISKS AND FILES 

CMS disks and files contained on disk are physically mapped using the 
data blocks described above: for disks, the QMSK, QQMSK, and the MFD; 
for files, the FST, chain links, and 800-byte file records. In storage, 
all of this data is accessed by means of two DSECTs whose addresses are 
defined in the DSECT NDCON, ADTSECT and AFTSECT. 



Managing Active Disks: The Active Disk Table 

The ADTSECT DSECT maps information in the active disk table (ADT) . This 
information includes data contained in the MFD, FST blocks, the QMSK, 
and QQMSK. The DSECT comprises of ten "slots," each representing one 
CMS virtual disk* A slot contains significant information about the 
disk such as a pointer to the MFD for the disk, a pointer to the first 
FST block and pointers to the QMSK and QQMSK, if the disk is a R/W disk. 
Also contained in ADTSECT is information such as the number of cylinders 
on the disk, the number cf records on the disk. 



Managing Active Files: The Active File Tabl e 

Each open file is represented in storage by an active file table (AFT) . 
The AFT (defined by the AFTSECT DSECT) contains data found on disk in 
FSTs, chain links, and data records. Also contained in the AFT is such 
information as the address of the first chain link for the file, the 
current chain link for the file, the address of the current data block, 
the fileid information for the file. Figure 1 shows the relationship 
between the AFT and other CMS data blocks. 



CMS ROUTINES DSED TO ACCESS THE FILE SYSTEM 

DMSACC is the control routine used to access a virtual disk. In 
conjunction with DMSACM and DMSACF, DMSACC builds, in virtual storage, 
the tables CMS reguires for processing files contained on the disk. The 
list below shows the logical flow of the main function of DMSACC. 



ACCESS A VIRTUAL DISK: DMSACC 

DMSACC: Scans the command line to determine which disk is specified. 

DMSLAD: Looks up the address of the ADT for the disk specified on the 
command line. 

DM SAC C: Determines whether an extension to a disk has been specified on 
the command line and ensures that it is correctly specified. 

DMSLAD: In the case where an extension has been specified, calls DMSLfiD 
to ensure that the extension disk exists. 

DMSLAD: Ensures that the specified disk is not already accessed as a R/W 
disk. 
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DMSFNS: In the case where the specified disk is replacing a currently 
accessed disk, closes any open files belonging to the duplicate disk. 

DMSACC: Verifies the paraaeters reiaining on the command line. 

DMSALU: Releases any free storage belonging to the duplicate disk via a 
call to DMSFRE. Also, clears appropriate entries in the ADT for use by 
the new disk. 

DMSACM: (Called as the first instruction by DMSACF) Reads, froa the 
Master File Directory, QMSK, and the QQMSK for the specified disk; also, 
DMSACM updates the ADT for the specified disk using information froa the 
MFD. 

D MSA CF: Reads into storage all the FST blocks associated with the 
specified disk. 

DMSACC: Handles error processing or processing required to return 
control to DMSINT. 



Handling I/O Operations 

CMS input/output operations for disk, tape, and unit record devices are 
always synchronous. Disk and tape I/O is initiated via a privileged 
instruction, DIAGNOSE, whose function code requests CP to perform 
necessary error recovery. Control is not returned to CHS until the 
operation is coaplete, except for tape rewind or rewind and unload 
operations, which return control imaediately after the operation is 
started. No interruption is ever received as the result of DIAGNOSE 
I/O. The CSH is stored only in the event of an error. 

Input/output operations to a card reader, card punch, or printer are 
initiated via a noraal START I/O instruction. After starting the 
operation, CMS enters the wait state until a device end interruption is 
received from the started device. Because the I/O is spooled by CP, CHS 
does not handle any exceptional conditions other than not ready, 
end-of-file, or forms overflow. 

CMS input/output operations to the terainal may be either synchronous 
or asynchronous. Output to the terminal is always asynchronous, but a 
program may wait for all terainal input/output operations to coaplete by 
calling the console wait routine. Input froa the terminal is usually 
synchronous but a user may cause CMS to issue a read by pressing the 
attention key. A program may also asynchronously stack data to be read 
by calling the console attention routine. 



UNIT RECORD I/O PROCESSING 

Seven routines handle I/O processing for CMS: DHSRDC, DMSPDN, and DHSPRT 
handle the READCARD, PUNCH, and PRINT commands and pass control to te 
actual I/O processors, DMSCIO (for READCARD and PUNCH) or DHSPIO (for 
PRINT) . DMSCIO and DMSPIO issue the SIO instructions that cause I/O to 
take place. Two other routines, DHSIOW and DMSITI, handle 
synchronization processing for I/O operations. Figure 18 shows the 
overall flow of control for I/O operations. 
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DMSRDC 
DMSPUN 
DMSPRT 




Figure 18. Flow of Control for Unit Record I/O Processing 



The following are more detailed descriptions of the flow of control for 
the read, punch, and print unit record control functions. 



Read a Card 

DMSRDC: Initializes block length and unit record size. 

DM SC IO: Initializes areas to read records. 

DMSCIO ; Issues an SIO command to read a record. 

DMSIOW: Sets the wait bit for the virtual card reader and load the I/O 
old PSW from NDCON. This causes CMS to enter a wait state until the 
read I/O is complete. 

DMSITI: Ensures that this interrupt is for the virtual reader. If not, 
the I/O old PSW is loaded, returning CMS to a wait state. If the 
interrupt is for the reader, DMSITI resets the wait bit in the I/O old 
PSW and loads it, causing control to return to DMSIOW. 

DMSIOW: Places the symbolic name of the interrupting device in the PLIST 
and passes control to the calling routine. 

DMSCIO: Checks for SENSE information and handle I/O errors, if 
necessary. 



CMS Method of Operation and Program Organization 



2-95 



DMSCWR: Displays a control record at the console. 

DMSSCN: If another control record is encountered, formats it via DMSSCN. 

DMSCWR: Displays the new control record at the console. 

DMSFNS: Closes the file when end-of-file occurs. 

DMSRDR: Issues a CP CLOSE command to close the card reader. 

Pu nch a Card 

DMSPUN: Ensures that a virtual punch is available; processes PONCH 
command options. 

DMSSTT; Verifies the existence of the file and returns its starting 
address. 

DMSPDN: If requested f sets up a header record and calls DMSCWR to write 
it to the console. 

DMSBRD: Reads a block of data into the read buffer; continues reading 
until the buffer is filled. 

DMSCIO: Initializes areas to punch records. 

DHSCIO: Issues the SIO instruction to punch the contents of the buffer. 

DMSCIO: Issues a call to DMSIOW to wait for completion of the punch I/O 
operation. 

DMSIOW: Sets the wait bit on for the virtual punch device and loads the 
I/O old PSW froa NOCON. This causes CMS to enter a wait state until the 
punch operation coapletes. 

D MSI TI: Ensures that this interrupt is for the punch. If not, the I/O 
old PSW is loaded returning CMS to a wait state. If the interrupt is for 
the punch, DMSITI resets the wait bit in the I/O old PSW and then loads 
the PSW, returning control to DMSIOW. 

DMSIOW: Places the syabolic naae of the interrupting device in the PLIST 
and passes control to DMSCIO. 

DMSCIO: Checks for SENSE information and handles I/O errors, if any. 

DMSPUN: Handles error returns and resets constants for the next punch 
operation. 

DMSFNS: Closes the file and returns control to the command handler, 
DMSINT. 



Print a File 

DMSPRT: Determines the device type of the printer. Checks out the 
specified fileid. Checks out the options specified on the PRINT command 
line. 

DMSSCN : Verifies the existence of the file and returns its starting 
address. 



2-96 IBM VM/370 System Logic and Program Determination — Volume 2 



DMSPRT: Determines the record size to be printed and sets up an 
appropriate buffer area via a call to DMSFRE. 

DMSFRE: Obtains storage space to be used as a buffer. 

DMSPRT: Deter mines whether the file to be printed is a library member or 
an input file. 

DMSBRD: Reads a record; continues reading until the buffer is filled. 
When the buffer is filled, calls DMSPIO to issue the SIO instruction to 
begin the print operation. 

DM SPIO : Issues the print Sio instruction and then calls DMSIOW to wait 
until the the I/O operation completes. 

DMSIOW : Sets the wait bit for the virtual printer device and load the 
I/O old PSW from NDCON. This causes CMS to enter a wait state until the 
print, opera <-i.cn compj.e«.es. 

DMSITI: Ensures that the interrupt is for the printer. If not, the I/O 
old PSW is reloaded, returning CMS to a wait state. If the interrupt is 
for the printer, DMSITI resets the WAIT bit in the I/O old PSW and loads 
that PSW, returning control to DMSIOW. 

DM SIO W: Places the symbolic name of the device in the last word of the 
PLIST and passes control to DMSPIO. 

DMSPIO: Performs channel testing and handles errors. TIO instructions 
and sense SIO instructions are issued during the test processing. These 
operations are synchronized using DMSIOW and DMSITI in the manner 
described above. When the I/O completes successfully, control returns 
to DMSPRT. 

DM SPR T: Determines whether all file records have been printed. If so, 
control returns to the caller. Otherwise, the address of the buffer is 
updated and more print operations are performed. 



Printer Carriage Control Characters Used by. DMSPIO 

CMS supports the use of ASCII control characters and machine carriage 
control characters for the printed output. Part of the CBS 
implementation depends upon the fact that the set of ASCII control 
characters has almost nothing in common with the set of machine control 
characters. There are two exceptions to this, the characters X'CT and 
X'CB*. These two characters, when interpreted as ASCII control 
characters, have the following meanings: 

C1 = Skip to channel 10 before print. 

C3 = Skip to channel 12 before print. 

The same characters, when interpreted as machine control characters, 
have the following meanings: 

C1 = Write, then skip to channel 8 after print. 

C3 = Do not write, but skip to channel 8 immediately. 

In printing lines containing carriage control characters, CHS has the 
capability of operating in two modes. In the first mode, which may be 
called ASCII control characters or machine control characters of either 
type are recognized and properly interpreted, except that the two 
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conflicting characters are always interpreted as ASCII control 
characters- In the second mode, which may be called machine-only, only 
machine control characters are recognized, and the two conflicting 
characters are treated as machine. 

The DMSPIO function uses a bit in the plist to indicate which of the 
two modes is in effect for printing. 

The PRINTL macro always uses ASA control character or machine control 
character mode. 

The PRINT command with the CC option always runs in ASCII control 
character or machine control character mode. 

OS simulation output, which is used, for example, by the MOVEFILE 
command, uses the RECFM field in the DCB or in the FILEDEF command to 
determine which mode is to be used. If FA, VA, or DA is specified, then 
ASCII control character or machine control character mode is used. If 
FM, VM, or UM is specified, then machine-only mode is used. If no 
control character specification is included with the RECFM, then it is 
assumed that the output line begins with a valid data character, rather 
than with a control character, and single spacing is always used. 



Handling Interruptions 

Figure 9 lists the CMS modules that process interruptions for CMS. CHS 
modules are described briefly in "CMS Module Description." SVC 9 
interruption processing is described in "Maintaining an Interactive 
Console Environment." 



Disk I/O in CMS 

Files residing on disk are read and written using DMSDIO. DMSDIO has 
two entry points: DMSDIOR, which is entered for a read I/O operation, 
and DMSDIOW, which is entered for a write operation. 

The actual disk I/O operation is performed using the DIAGNOSE code 18 
instruction. A return code of from CP indicates a successful 
completion of the I/O operation. If the I/O is not successful, CP 
performs error recording, retry, recovery, or AEEND procedures for the 
virtual machine. 



READ OR WRITE DISK I/O 

DMSDIO: Initializes the CCW to perform read operations. 

DMSLAD: Obtains the address of the disk from which to read or write. 

DMSDIO: Determines the size of the record to be read or written. 

DMSFRE: Gets enough storage to contain the record if the reguest is for 
a record longer than 800 bytes. 

DMSDIO: Reads records continually until all records for the file have 
been read. 
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DMSFRE: Returns the buffer to free storage if the record was longer than 
800 bytes. 

DMSDIO: Returns to the caller. 



Managing CMS Storage 

DMSFRE handles requests for CMS free storage. The sections of CMS 
storage have the following uses: 

• DMSNUC (X 1 00000' to approximately X* 03000') - This is the nucleus 
constant area. It contains pointers, flags, and other data 
maintained by the various system routines. 

• Low-core DMSFREE free storage area {approximately X' 03000' to 
X'OEOOO') - This area is a free storage area, from which requests 
from DMSFREE are allocated. The top part of this area contains the 
file directory for the system disk (SSTAT) . If there is enough room 
(as there will be in most cases) , the FREETAB table also occupies 
this area, just below the SSTAT. 

• Transient program area (X'OEOOO 1 to X« 10000') - Because it is not 
essential to keep all nucleus functions resident in storage all the 
time, some of them are made "transient." This means that when they 
are needed, they are loaded from the disk into the transient program 
area. Such programs may not be longer than two pages, because that 
is the size of the transient area. (A page is 4096 bytes of virtual 
storage.) 

• CMS nucleus (X' 10000' to X'20000') - Segment 1 of storage contains 
the reentrant code for the CMS nucleus routines. In shared CHS 
systems, this is the protected segment. That is, this segment must 
consist only of reentrant code, and may not be modified under any 
circumstances. This fact implies certain system restrictions for 
functions which require that storage be modified, such as the fact 
that DEBUG breakpoints or CP ADSTOP commands cannot he placed in this 
segment, in a saved system. 

• user program area (X s 20000* to loader tables) - User programs are 
loaded into this area by the LOAD command. Storage allocated by 
means of the GETMAIN macro instruction is taken from this area, 
starting from the high address of the user program. In addition, 
this storage area can be allocated from the top down by DMSFREE, if 
not enough storage is available in the low-core DMSFREE storage area. 
Thus, the effective size of the user program area is reduced by the 
amount of free storage which has been allocated from it by DMSFREE. 

• Loader tables (top pages of storage) - The top of storage is occupied 
by the loader tables, which are required by the CMS loader. These 
tables indicate which modules are currently loaded in the user 
program area (and the transient program area after a LOAD command) . 
The size of the loader tables can be varied by the SET LDRTBLS 
command. 



TYPES OF ALLOCATED FREE STORAGE 

Free storage can be allocated by means of the GETMAIH or DMSFREE macros. 

Storage allocated by means of the GETMAIS macro is taken from the 
user program area, beginning with the high address of the user program. 
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Storage allocated 
several areas. 



by oeans of the DMSFREE macro can be taken from 



First, DMSFREE requests are allocated from the low-address free 
storage area. If requests cannot be satisfied from there, they will be 
satisfied from the user program area. 

In addition, requests are further broken down between requests for 
user storage and nucleus storage, as specified in the TYPE parameter of 
the DMSFREE macro. These two types of storage are kept in separate 4K 
pages. It is possible, if there are no 4K pages completely free in lew 
storage, for no storage of one type to be available in low storage, 
while there is storage of the other type available there. 



GETMAIN FREE STORAGE MANAGEMENT POINTERS 



All GETMAIN storage is allocated in the user program area, starting from 
the end of the user's actual program. Allocation begins at the location 
pointed to by NUCON pointer MAINSTRT. The location MAINHIGH in NDCON is 
the pointer to the highest address of GETMAIN storage. 

When the STRINIT macro is executed, both MAINSTRT and MAINHIGH are 
initialized to the end of the user's program, in the user program area. 
As storage is allocated from the user program area to satisfy GETMAIN 
requests, the MAINHIGH pointer is adjusted upward. Such adjustments 
are always in multiples of doublewords, so that this pointer is always 
on a doubleword boundary. As the allocated storage is released, this 
pointer is adjusted downward. 

The pointer MAINHIGH can never be higher than FREELOWE, the pointer 
to the lowest address of DMSFREE storage allocated in the user program 
area. If a GETMAIN request cannot be satisfied without extending 
MAINHIGH above FREELOWE, GETMAIN takes an error exit, indicating that 
insufficient storage is available to satisfy the request. 

The area between MAINSTRT and MAINHIGH may contain blocks of storage 
that are not allocated, and that are therefore available for allocation 
by a GETMAIN instruction. These blocks are chained together, with the 
first one pointed to by the NDCON location MAINLIST. 



The format 
follows: 



of an element on the GETMAIN free element chain is as 



< n bytes > 

i 1 

FREPTR — pointer to next free 
0(0) | element in the chain, or 
if there is no next element 

FRELEN — length, in bytes, of 
4 (4) | this element 



Remainder of this free element 
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DHSFREE FREE STORAGE POINTERS 

The pointers FREEDPPR and FREELOWE in NDCON indicate the aaount of 

storage which DMSFREE has allocated from the high portion of the user 

program area. These pointers are initialized to the beginning of the 

system loader tables. 

The pointer FREELOWE is the pointer to the lowest address of DHSFREE 
storage in the user program area. As storage is allocated from the user 
program area to satisfy DMSFREE requests, this pointer is adjusted 
downward. Such adjustments are always in multiples of 4K, so that this 
pointer is always on a 4K boundary. As the allocated storage is 
released, this pointer is adjusted upward when whole 4K pages are 
completely free. 

The pointer FREELOWE can never be lower than MAINHIGH, the pointer to 
the highest address of GETnAIN storage. If a DMSFREE request cannot be 
satisfied without extending FREELOWE below MAIHHIGH, then DMSFREE takes 
an error exit, indicating that insufficient storage is available to 
satisfy the request. 

The FREETAB free storage table is kept in free storage, usually just 
below the master file directory for the system disk. If there was no 
space available there, then FREETAB was allocated from the top of the 
user program area. This table contains one byte for each page cf 
virtual storage. Each such byte contains a code indicating the use of 
that page of virtual storage. The codes in this table are as follows: 

USJ5RC0DE Q) : If the page is assigned to user storage. 

NUCCODE (2): If the page is assigned to nucleus storage. 

TRNCODE (3): If the page is part of the transient program area. 

USARCODE (4): If the page is part of the user program area. 

SYSCODE (5): If the page is none of the above. 

In these cases, the page is assigned to system storage, system code, 
or the loader tables. 

Other DMSFREE storage pointers are maintained in the DMSFRT control 
section, in NOCON. The most important fields there are the four chain 
header blocks. 

Four chains of elements are not allocated to be associated with 
DMSFREE storage: The low-storage nucleus chain, the low-storage user 
chain, the high-storage nucleus chain, and the high-storage user chain. 
For each of these chains, exists a control block consisting of four 
words, with the following format: 
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0(0) 



4(4) 



8(8) 



12(C) 



< 4 bytes > 

i 1 

POINTER — pointer to the first 
free element on the chain, or 
zero, if the chain is empty. 



HUH — the number of elements on 
the chain. 



MAX — the value in this word is 
the size of the largest free 
element on the chain. 



FLAGS- | SKEY - | TCODE -| Unused 
Flag | Storage IFREETAB | 
byte | key | code | 



These fie!3s have the fcllcving aeanings and uses; 



POINTER This field points to the first element on this chain of free 
elements. If there are no elements on this free chain, then 
the POINTER field contains a zero. 

NUM This field contains the number of elements on this chain of 
free elements. If there are no elements on this free chain, 
then this field contains a zero. 

MAX This field is used for the purpose of avoiding searches which 
will fail. It contains the size, in bytes, of the largest 
element on the free chain. Thus, a search for an element of a 
given size will not be made if that size exceeds the MAX field. 

FLAGS The following flags are used: 

FLCLN (X'80») 

Clean-up flag - This flag is set if the chain must be cleaned up. 
This is necessary in the following circumstances: 

- If one of the two high-core chains contains a 4K page that is 
pointed to by FREELOWE, then that page can be removed from the 
chain, and FREELOWE can be increased. 

- All completely non-allocated 4K pages are kept on the user 
chain, by convention. Thus, if one of the nucleus chains 
(low-core or high-core) contains a full page, then this page must 
be transferred to the corresponding user chain. 

FLCLB (X'l»0') 

Clobbered flag - Set if the chain has been destroyed. 

FLHC (X^O 1 ) 

High-core chain - Set for both the nucleus and user high-core 
chains. 

FLNU (XM0«) 

Nucleus chain - Set for both the low-core and high-core nucleus 
chains. 
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FLPA (x»08») 

Page available - This flag is set if there is a full 4K page 
available on the chain. Note that this flag may be set even if 
there is no such page available. 

SKEY This one-byte field contains the storage key assigned to storage 
on this chain. 

TCODE This one-byte field contains the FREETAB table code for storage on 
this chain. 



Each element on the free chain has the following format: 



< U hvtes 



0(0) 



POINTER — pointer to the next 
element in the free chain 



4(4) 



SIZE — size of this free 
element, in bytes 



Remainder of this free element 



When the user issues a variable length GETMAIN, the control program 
reserves 6 1/2 pages for CMS usage; this is a designed and set value. 
If the user wants more space, for example, for more directories, he 
should free (from the high end of storage) some of the variable GETMAIN 
area. 

As indicated in the illustration above, the POINTER field points to 
the next element in the chain, or contains the value zero if there is no 
next element. The SIZE field contains the size of this element, in 
bytes. 

All elements within a given chain are chained together in order of 
descending storage address. This is done for two reasons: 

1. Because the allocation search is satisfied by the first free 
element that is large enough, the allocated elements are grouped 
together at the top of the storage area, and prevent storage 
fragmentation. This is particularly important for high-storage 
free storage allocations, because it is desirable to keep FREELOflE 
as high as possible. 

2. If free storage does become somewhat fragmented, the search causes 
as few page faults as possible. 

As a matter of convention, completely nonallccated 4K pages are kept 
on the user chain rather than the nucleus chain. This is because 
reguests for large blocks of storage are made, most of the time, from 
user storage rather than from nucleus storage. Nucleus requests need to 
break up a full page less frequently than user requests. 
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DMSFRE METHOD OF OPERATION 

A description of the algorithms which allocate and release blocks 
follows. The descriptions are based on the assumption that neither 
AREA=LOW nor AREA=HIGH was specified in the DMSFREE macro call. If 
either was specified, then the algorithm must be appropriately modified. 

ALLOCATING USER FREE STORAGE: When DMSFREE with TYPE=DSER (the default) 
is called, the following steps are taken to satisfy the request. As 
soon as one of the steps succeeds, then processing can terminate. 

DMSFRE: 

1. Searches low-storage user chain for a block of the required size. 

2. Searches the high-storage user chain for a block of the required 
size. 

3. Extends high-storage user storage downward into the user program 
area, modifying FREELOWE in the process. 

4. For fixed requests, there is nothing more to try. For variable 
requests, DMSFRE puts all available storage in the user program 
area onto the high-storage user chain, and then allocates the 
largest block available on either the high-storage user chain or 
the low-storage user chain. The allocated block is not 
satisfactory, if it is not larger then the minimum requested size. 

ALLOCATING NUCLEUS FREE STORAGE: When DHSFREE with TYPE=NUCLEUS is 
called, the following steps are taken in an attempt to satisfy the 
request, until one succeeds. DMSFREE: 

1. Searches the low-storage nucleus chain for a block of the required 
size. 

2. Gets free pages from low-storage user chain, if any are available, 
and removes them to the low-storage nucleus chain. 

3. Searches the high-storage nucleus chain for a block of the required 
size. 

4. Gets free pages from the high-storage user chain, if they are 
available, and removes them to the highstorage nucleus chain. 

5. Extends high-storage nucleus storage downward into the user program 
area, modifying FREELOWE in the process. 

6. For fixed requests, there is nothing more to try. For variable 
requests, DMSFRE puts all available pages from the user chains and 
the user program area onto the nucleus chains, and allocates the 
largest block available on either the low-storage nucleus chains or 
the high-storage nucleus chains. 

RELEASING STORAGE: When DMSFRET is called, the block being released is 
placed on the appropriate chain. At that point, the cleanup operation 
is performed, if necessary, to advance FREELOWE, or to move pages from 
the nucleus chain to the corresponding user chain. 

Similar cleanup operations are performed, when necessary, after calls 
to DMSFREE, as well. 
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RELATIVE EFFICIENCY OF DMSFREE REQUESTS 

The types of DMSFREE request in decreasing order of efficiency, are as 
follows: 

1. User fixed storage requests, any size. 

2. Nucleus fixed storage requests, for small blocks (less than one 
page in size) . 

3. Nucleus fixed storage request, for large blocks. 

i\. User variable storage requests. (Variable requests are no less 
efficient than fixed requests, if the maximum block size requested 
can be allocated.) 

5. Fixed variable storage requests, if the maximum block size 
requested cannot be allocated. 



RELEASING ALLOCATED STORAGE 

STORAGE ALLOCATED BY GETMAIN: Storage allocated by the GETMAIN macro 
instruction may be released in any of the following ways: 

• A specific block of such storage may be released by means of the 
FREEMAIN macro instruction. 

• The STRINIT macro instruction releases all storage allocated by any 
previous GETMAIN requests. 

• Almost all CMS commands call the STRINIT routine. Thus, executing 
almost any CMS command causes all GETMAIN storage to be released. 

STORAGE ALLOCATED BY DMSFREE: Storage allocated by the DMSFREE macro 
instruction may be released in either of the following ways: 

• A specific block of such storage may be released by means of the 

DMSFRET macro instruction. 

• Whenever any user routine or CMS command abends (so that the routine 
DMSABN is entered) , and the ABEND recovery facility of the system is 
invoked, all DMSFREE storage with TYPE=OSER is released 
automatically. 

Except in the case of ABEND recovery, storage allocated by the DMSFREE 
macro is never released automatically by the system. Thus, storage 
allocated by means of this macro instruction should always be released 
explicitly by means of the DMSFRET macro instruction. 



DMSFRE SERVICE ROUTINES 

The system uses the DMSFRES macro instruction to request certain free 
storage management services. The options and their meanings are as 
follows: 

• INIT1 — DMSINS calls this option to invoke the first free storage 
initialization routine, to allow free storage requests to access the 
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system disk. Before this routine is invoked, no free storage 
requests may be made. After* this routine has been invoked, free 
storage requests may be made, but these are subject to the following 
restraints until the second free storage management initialization 
routine has been invoked: 

— All requests for user storage are changed to requests for nucleus 
storage. 

— Only partial error checking is performed by the DMSFRET routine. 
In particular, it is possible to release a block that was never 
allocated. 

— All requests that are satisfied in high storage must be temporary, 
because all high storage allocated is released when the second 
free storage initialization routine is invoked. 

When CP*s saved system facility is used, the CMS system is saved 
at the point just after the system disk has been accessed. This 
means that it is necessary for DMSFRE to be used before the size of 
virtual storage is known, because the saved system can be used on any 
size virtual machine. Thus, the first initialization routine 
initializes DHSFRE so that limited functions can be requested, while 
the second initialization routine performs the initialization 
necessary to allow the full functions of DMSFRE to be requested. 

• INIT2 — This option is called by DMSINS to invoke the second 
initialization routine. This routine is invoked after the size of 
virtual storage is known, and it performs the initialization 
necessary to allow all the functions of DMSFRE to be used. The 
second initialization routine performs the following steps: 

— Releases all storage that has been allocated in the highstorage 
area. 

— Allocates the FREETAB free storage table. This table contains one 
byte for each 4096-byte page of virtual storage, and so cannot be 
allocated until the size of virtual storage is known. It is 
allocated in the low-address free storage area, if there is enough 
room available. If not, then it is allocated in the higher free 
storage area. For a 256K virtual machine, FREETAB contains 64 
bytes; for a 16 million byte machine, it contains 4096 bytes. 

— The FREETAB table is initialized, and all storage protection keys 
are initialized. 

— All completely non-allocated 4K pages on the nucleus free storage 
chain are removed to the user chain. Any other necessary cleaning 
up operations are performed. 

• CHECK — This option can be called at any time for system debugging 
purposes. It invokes a routine that performs a thorough check of all 
free storage chains for consistency and correctness. Thus, it checks 
to see whether any free storage pointers have been destroyed. 

• CKON — This option turns on a flag which causes the CHECK routine 
described in the preceding paragraph to be invoked each time any call 
is made to DMSFREE or DMSFRET. This can be useful to pinpoint a 
problem that is, for example, destroying free storage management 
pointers. Care should be taken when using this option, because the 
CHECK routine is coded to be thorough rather than efficient. 
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Thus, after the CKON option has been invoked, each call to DMSFREE or 
DMSFRET takes many times as long to be completed as before. This can 
impact the efficiency of system functions. 

CKOFF — Use of this option turns off the flag that was turned by the 
CKON option, described in the preceding paragraph. 

DHEC — This option is called by DMSABN during the ABEND recovery 
process to release all USER storage. 

CALOC — This option is called by DMSABN after the ABEND recovery 
process has been completed. It invokes a routine that returns, in 
register 0, the number of doublewords of free storage that have been 
allocated. This figure is used by DMSABN to determine whether ABEND 
recovery has been successful. 



STORAGE PROTECTION KEYS 

In general, the following rule applies: system storage is assigned the 
storage key of X'F 1 , while user storage is assigned the key of X'E». 
This is the storage key associated with the protected areas of storage, 
not to be confused with the PSW or CAW key used to access that storage. 

The specific key assignments are as follows: 

• The NUCON area is assigned the key of X'F*, with the exception of a 
half-page containing the OPSECT and TSOBLOKS areas, which has a key 
of X'E'. 

• Free storage allocated by DMSFREE is broken up into user storage and 
nucleus storage. The user storage has a protection key of X'E 1 , 
while the nucleus storage has a key of X'F*. 

• The transient program area has a key of X'E*. 

• The CMS nucleus code has a storage key of X'F'. In saved systems, 
this entire segment is protected by CP from modification even by the 
CMS system, and so must be entirely reentrant. 

• The user program area is assigned the storage key of X'E', except for 
those pages which contain Nucleus DMSFREE storage. These latter 
pages are assigned the key of X*F*. 

• The loader tables are assigned the key of X'F 1 . 



CMS SYSTEM HANDLING OF PSW KEYS 

The CMS nucleus protection scheme protects the CMS nucleus from 
inadvertent destruction by a user program. This mechanism, however, 
does not prevent a user from writing in system storage intentionally. 
Because a CMS user can execute privileged instructions, he can issue a 
LOAD PSW (LPSW) instruction and load any PSW key he wishes. If a user 
defeats nucleus protection in this way there is nothing to prevent his 
program from: 

• Modifying nucleus code 
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• Modifying a table or constant area 

• Losing files by modifying a CHS file directory 

In general, user programs and disk-resident CMS commands run with a 
PSW key of X^*, while nucleus code runs with PSW key of X'O*. 

There are, however, some exceptions to this rule. Certain 
disk-resident CMS commands run with a PSW key of X'O 1 , because they need 
to modify nucleus pointers and storage. On the other hand, the nucleus 
routines called by the GET, PUT, READ and WRITE macros run with a user 
PSW key of X'E', to increase efficiency. 

Two macros, DMSKEY and DMSEXS, are available for changing the PSW 
key. The DMSKEY macro changes the PSW key to the user value or the 
nucleus value. DMSKEY NUCLEUS causes the current PSW key to be placed 
in a stack, and a value of to be placed in the PSW key. DMSKEY USER 
causes the current PSW key to be placed in a stack, and a value of X'E' 
to be placed in the PSW key. DMSKEY RESET causes the top value in the 
DMSKEY stack to be removed and re-inserted into the PSW. 

It is a CMS requirement when a routine terminates, that the DMSKEY 
stack must be empty. This means that a routine should execute a DMSKEY 
RESET macro instruction for each DMSKEY NUCLEUS macro instruction and 
each DMSKEY USER macro instruction executed by the routine. 

The DMSKEY key stack has a maximum depth of seven for each routine. 
In this context, a "routine" is anything invoked by an SVC call. The 
DMSEXS ("execute in system mode") macro instruction is useful in 
situations where a routine is running with a user PSW key, but wishes to 
execute a single instruction with the nucleus PSW key. The single 
instruction may be specified as the argument to the DHSEXS macro, and 
that instruction is executed with a system PSW key. 



CP HANDLING FOR SAVED SYSTEMS 

The explanation of saved system nucleus protection depends on the VSK, 
RSK, VPK and RPK: 

1. Virtual Storage Key (VSK) - This is the storage key assigned by the 
virtual machine using the virtual SSK instruction. 

2. Real Storage Key (RSK) - This is the actual storage key assigned 
by CP to the 2K page. 

3. Virtual PSH Key (VPK) - This is the PSW storage key assigned by the 
virtual machine, by means of an instruction such as LPSW (Load 
PSW) . 

4. Real PSW Key (RPK) - This is the PSW storage key assigned by CP, 
which is in the real hardware PSW when the virtual machine is 
running. 

When there are no shared segments in the virtual machine, then 
storage protection works as it does on a real machine. RSK=VSK for all 
pages, and RPK=VPK for the PSW. 

However, when there is a shared segment (as in the case of segment 1 
of CMS in the saved system) , it is necessary for CP to protect the 
shared segment. For non-CMS shared systems, it does this by, 
essentially, ignoring the values of the VSKs and VPK, and assigning the 
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real values as follows: RSK=0 for each page of the shared segment, 
RSK=F for all other pages, and RPK=F, always, for the real PSW. The SSK 
instruction is ignored, except to save the key value in a table in case 
the virtual machine later does an ISK to get it back. 

For the CHS saved system, the RSKs and RPK are initialized as before, 
but resetting the virtual keys has the following effects: 

• If the virtual machine uses an SSK instruction to reset a VSK, CP 
does the following: If the new VSK is nonzero, CP resets the RSK to 
the value of the VSK; if the new VSK is zero, CP resets RSK to F. 

• If the virtual machine uses a LPSW (or other) instruction to reset 
the VPK, CP does the following: If the new VPK is zero, CP resets the 
RPK to the value of the VPK; if the new VPK is zero, CP resets RPK to 

F. 

• If the VPK=0 and the RPK=F, storage protection may be handled 
differently. In a real machine, a PSW key of would allow the 
program to store into any storage location, no matter what the 
storage key. But under CP, the program gets a protection violation, 
unless the RPK of the page happens to be F. 

Because of this, there is extra code in the CP program check handling 
routine. Whenever a protection violation occurs, CP checks to see if 
the following conditions hold: 

The virtual machine running is the saved CMS system, running 
with a shared segment. 

The VPK = 0. The virtual machine is operating as though its PSW 
key is 0. 

The RSK of the page into which the store was attempted is 
nonzero, and different from the RPK. 

If any one of these three conditions fails to hold, then the 
protection violation is reflected back to the virtual machine. 

If all three of these conditions hold, then the RPK (the real 

nrnf orfi nn Iran in -t-lio raz* 1 DCB1 to t-ooo*- +• f> +h© T?^K O.f +h& Bafjo ITifTi 

which the store was attempted. 

EFFECT ON CMS: In CMS, this works as follows: CMS keeps its system 
storage in protect key F (RSK = VSK = F) , and user storage in protect 
key E (RSK = VSK = E) . 

When the CMS supervisor is running, it runs in PSW key (VPK = 0, 
RPK = F) , so that CMS gets a protection violation the first time it 
tries to store into user storage (VSK = RSK = E) . At that point, CP 
changes the RPK to E, and lets the virtual machine re-execute the 
instruction which caused the protection violation. There is not another 
protection violation until the supervisor goes back to storing into 
system-protected storage. 

RESTRICTIONS ON CMS: There are several coding restrictions which must 
be imposed on CMS if it is to run as a saved system. 

The first and most obvious one is that CMS may never modify segment 
1, the shared segment, which runs with a RSK of C, although the VSK = F. 

A less obvious, but just as important, restriction, is that CMS may 
never modify with a single machine instruction (except MVCL) a section 
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of storage which crosses the boundary between two pages with different 
storage keys. This restriction applies not only to SS instructions, 
such as MVC and ZAP, but also to RS instructions, such as STM, and to BX 
instructions, such as ST and STD, which may have nonaligned addresses on 
the System/370. An exception is the MVCL instruction which can be 
restarted after crossing a page boundary because the registers are 
updated when the paging exception occurs. 

This restriction also applies to I/O instructions. If the key 
specified in the CCW is zero, then the data area for input may not cross 
the boundary between two pages with different storage keys. 

OVERHEAD: It can be seen that this system is most inefficient when 
"storage-key thrashing" occurs — when the virtual machine with a VPK of 

jumps around, storing into pages with different VSK's. 

ERROR CODES FROM DMSFREE, DMSFRES, AND DMSFRET 
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indicates that the request could not be satisfied. Register 15 contains 
this return code, indicating which error has occurred. The codes below 
apply to the DMSFRES, DMSFREE and DMSFRET macros. 

Code Error 

1 DMSFREE — Insufficient storage space is available to satisfy the 
request for free storage . In the case of a variable request, 
even the minimum request could not be satisfied. 

2 DMSFREE or DMSFRET — Dser storage pointers destroyed. 

3 DMSFREE or DMSFRET — Nucleus storage pointers destroyed. 

H DMSFREE — An invalid size was requested. This error exit is 

taken if the requested size is not greater than zero. In the 
case of variable requests, this error exit is taken if the 
minimum request is greater than the maximum request. However, 
the error is not detected if DMSFREE is able to satisfy the 
maximum request. 

5 DMSFRET — An invalid size was passed to the DMSFRET macro. This 
error exit is taken if the specified length is net positive. 

6 DMSFRET — The block of storage which is being released was never 
allocated by DMSFREE. Such an error is detected if one of the 
following errors is found: 

a. The block is not entirely inside either the free storage area 
in low storage or the user program area between FREELOWE and 
FREEUPPR. 

b. The block crosses a page-boundary which separates a page 
allocated for user storage from a page allocated for nucleus 
type storage. 

c. The block overlaps another block already on the free storage 
chain. 

7 DMSFRET — The address given for the block being released is not 
a doubleword boundary. 

8 DMSFRES — An illegal request code was passed to the DMSFRES 
routine. Because all request codes are generated by the DHSFRES 
macro, this error code should never appear. 
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DMSFRE, DMSFRET, or DMSFRES — An unexpected internal error 
occurred. 



THE DMSFRES MACRO 

CMS uses the DMSFRES macro to request special internal free storage 

Management services. Use of this macro by non-system routines causes 

unpredictable results. The format is: 



| label | DMSFRES | option | 

i 1 

where "option" is one of the following: 

INIT1 Performs the CMS system first initialization routine. 

INIT2 Performs the CMS system second initialization routine. 

CHECK Invokes a routine that checks the validity of all current free 
storage management pointers. 

CKON Sets a flag that causes the CHECK to be invoked for each call to 
DMSFREE or DMSFRET. 

CKOFF Turns off the above flag. 

OREC Assists ABEND recovery, by releasing all DSER-type DMSFREE 
storage allocations. 

CALOC Assist ABEND recovery, by computing the total amount of allocated 
storage, excluding the system disk MFD and the FREETAB table. 

For a full discussion of the meanings of these options, refer to 
"DMSFRE Service Routines." 

THE DMSKEY MACRO 

CMS uses the DMSKEY macro to modify the PSW storage protection key so 
that the nucleus code can store data into protected storage. The format 
is: 

i « 

| [label] | DMSKEY | {NUCLEUS[ ,NOSTACK] | | 

| | | OSER[ ,NOSTACK]| | 

| | | LASTUSER[,NOSTACK]| I 

I | | RESET} | 

i 1 

where: 

NUCLEUS The nucleus storage protection key is placed in the PSH, and 
the old contents of the second byte of the PSW is saved in a 
stack. Use of this option allows the program to store into 
system storage, which is ordinarily protected. 

USER The user storage protection key is placed in the PSW, and the 
old contents of the second byte of the PSW is saved in a 
stack. Use of this option prevents the program from 
inadvertently modifying nucleus storage, which is protected. 
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LASTUSER The SVC handler traces back through its system save areas for 
the active user routine closest to the top of the stack, and 
the storage key in effect for that routine is placed in the 
PSW. The old contents of the second tyte of the PSW is saved 
in a stack. This option should be used only by system 
routines that should enter a user exit routine. 

NOSTACK This option may be used with any of the above options to 
prevent the system from saving the second byte of the current 
PSW in a stack. If this is done, then no DMSKEY RESET need be 
issued later. 



RESET The second byte of the PSW is changed 
of the PSW key stack, and removed fro 
effect of the last DMSKEY NUCLEUS or 
is reversed. This option should may 
the effect of a DMSKEY macro for whic 
specified. A DMSKEY RESET macro mus 
DMSKEY NUCLEUS, USER or LASTUSER macr 
that did not specify the NOSTACK opti 
this rule results in program abnormal 



to the value at the top 
m the stack. Thus, the 
OSER or LASTUSER request 

not be used to reverse 
h the NOSTACK option was 
t be executed for each 
o that was executed and 
on. Failure to observe 
termination. 



THE DMSEXS MACRO 



System commands running in user protect status use the DMSEXS macro to 
execute a single instruction with a system protect key in the PSW. This 
macro instruction can be used in lieu of two DMSKEY macros. The format 
is: 



I [label] | DMSEXS | op-code, operands 



The op-code and the operands of the instruction to be executed must 
be given as arguments to the DMSEXS macro. 

For example, execution of the sequence, 

USING NUCON,0 

DMSEXS OI,OSSFLAGS,COMPSWT 

would cause the 01 instruction to be executed with a zero protect key in 
the PSW. This sequence would turn on the COMPSWT flag in the nucleus. 
It would be reset with 

DMSEXS NI,OSSFLAGS,255-COMPSWT 

The instruction to be executed may be an EX instruction. 

Register 1 cannot be used in any way in the instruction being 
executed. 
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Simulate Non-CMS Operating Environments 



The following contains descriptions for: access method support for 
non-CMS operating systems, CMS simulation of OS functions, and CBS 
implementation of DOS/VS functions. 

Access Method Support for Non-CMS 
Operating Environments 

OS ACCESS METHOD SUPPORT 

An access method governs the manipulation of data. To make the 
execution of OS generated code easier tinder CMS, the processing program 
must see data as OS would present it. For instance, when the processors 
expect an access method to acguire input source records sequentially, 
CMS invokes its sequential access method and passes data to the 
processors in the format that the OS access methods would have produced. 
Therefore, data appears in storage as if it had been manipulated using 
an OS access method. For example, block descriptor words (BDW) , buffer 
pool management, and variable records are maintained in storage as if an 
OS access method had processed the data. The actual writing to and 
reading from the I/O device is handled by CMS file management. 

The work of the volume table of contents (VTOC) and the data set 
control block (DSCB) is done by a master file directory (MFD) to 
maintain disk contents and a file status table (FST) for each data file. 
All disks are formatted in physical blocks of 800 bytes. 

CMS continues to maintain the OS format, within its own format, on 
the auxiliary device, for files whose filemode number is 4. That is, 
the block and record descriptor words (BDW and RDW) are written along 
with the data. If a data set consists of blocked records, the data is 
written to and read from the I/O device in physical blocks, rather than 
logical records. CMS also simulates the specific methods of 
manipulating data sets. 

To accomplish this simulation, CMS supports certain essential macros 
for the following access methods: 

• BDAM (direct) — identifying a record by a key or by its relative 

position within the data set. 

• BPAM (partitioned) — seeking a named member within an entire data set. 

• BDAM/QSAM (sequential) — accessing a record in a sequence relative to 

• YSAM (direct or sequential) — accessing a record sequentially or 

directly by key or address. CMS support of OS VSAM files is 
based on DOS/VS access method services and the virtual storage 
access method (VSAM) . Therefore, the OS user is restricted to 
those services available under DOS/VS AMS and VSAM. 
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CMS Support for the Virtual Storage 
Access Method 

CMS simulation of OS and DOS includes support for the virtual storage 
access method (VSAM) . The description of this support is in three 
parts: 

• A description of the access method services program (AMSERV) , which 
allows you to create and update VSAM files. 

• A description of support for VSAM functions under CMS/DOS. 

• A description of support for VSAM functions for the CMS OS simulation 
routines. 

The routines that support VSAM reside in three discontiguous shared 
segments (DCSSs) . 

— The CKSAMS DCSS, which contains the DOS/VS AMS code to support 
AMSERV processing. 

— The CMSVSAM DCSS, which contains actual DOS/VS VSAM code, and the 
CMS/VSAM OS interface program for processing OS VSAM requests. 

— The CMSDOS DCSS, which contains the cede that supports DCS 
requests under CMS. 

Note: DMSVSR, which performs completion processing for CMS/VSAM support, 
resides in the CMS nucleus. 



CREATING THE DOSCB CHAIN 

The DLBL command creates a control block called a DOSCB in CMS free 
storage. The ddname specified in this DLBL command is associated with 
the ddname parameter in the program's ACB. 

The DOSCB contains information defining the file for the system. The 
information in the DOSCB parallels the information written on the label 
information cylinder of a real DOS SYSRES unit, e.g. the name, and mode 
(volume serial number) of the data set, its logical unit specification, 
and its data set type (SAM or VSAM) . The anchor for this chain is at 
location DOSFIRST in NUCON. 



Executing an AMSERV Function 

The CMS AMSERV command invokes the module DMSftMS, which is the CBS 
interface to the DOS/VS access method services (AMS) program. Module 
BMSAMS loads DOS/VS AMS code contained in the CMSAMS DCSS by means cf 
the LOADSYS DIAGNOSE 64. The AMS code requires the services of DOS/VS 
code that resides in the CMSVSAM DCSS so that DCSS is also loaded via 
LOADSYS DIAGNOSE 64 when the VSAM master catalog is opened. Figure 19 
shows the relationship in storage between the interface module DMSABS 
and the CMSAMS and CMSVSAM DCSSs. 

The following is a general description of the BMSAMS method of 
operation. 
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Figure 19. Relationship in Storage between the CMS Interface 
DMSAMS and the CMSAMS and CMSVSAM DCSSs 
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DMSAMS first deteriines whether the user is in the CMS/DOS 
environment. If not, a SET DOS ON (VSAM) command is issued to load the 
CMSDOS segment and initialize the CMS/DOS environment. In this case, 
BMSAMS must also issue ASSGN commands for the disk modes in the DOSCB 
chain created by the OS user's DLBL commands. An ASSGN is also issued 
for SYSCAT, the YSAM master catalog. 

DMSAMS then issues the ASSGN command for the SYSIPT and SYSLST files, 
assigning them to the user's A-disk. DLBL commands are then issued 
associating these units with files on the user's A-disk. Input to the 
AMSERV processor is the SYSIPT file, which has the filetype AMSERV. 
Output from AMSERV processing is placed in the SYSLST file, which has a 
filetype of LISTING. 

DIAGNOSE 64 (LOADSYS) is then issued to load the CMSAMS DCSS, which 
contains the DOS/VS AMS code. A DOS/VS SVC 65 is issued to find the 
address of the DOS/VS AMS root phase, IDCAMS. When the SVC returns with 

the address cf IDCAMS, a branch is made to IDCAMS, giving control to 
"live" DOS/VS routines. 

IDCAMS expects parameters to be passed to it when it receives 
control. DMSAMS passes dummy parameters in the list labeled AMSPAHMS. 

After the root phase IDCAMS receives control, the functions in the 
file specified by the filename on the AMSERV command are executed. 
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In performing the functions requested in this file, AMS nay require 
execution of DOS/VS VSAM phases located in the CMSVSAM DCSS. The 
CMSVSAM DCSS is loaded when AMS opens the VSAM catalog for processing. 

On return from DOS/VS code, DMSAMS purges the CMSAHS DCSS, and issues 
DLBL commands for the SYSIPT and SYSLST files to clear the DOSCB's for 
these ddnames. 

Control is then passed to DMSVSR, which purges the CMSVSAM DCSS. If 

the user program was not in the CMS/DOS environment when DMSAMS was 

entered, the SET DOS OFF command is issued by DHSVSR. Upon return from 

DMSVSR, DMSAMS performs minor housekeeping tasks and returns control to 

CMS. 



Executing a VSAM Function for a DOS User 

When a VSAM function, such as an OPEN or CLOSE macro, is requested from 

a DOS program.. CHS ron+es control through the CMSDOS DCSS to the CMSVS1M 

DCSS, thus giving control to DOS/VS VSAM phases. Figure 20 shows the 

relationships in storage between the user program, the CMSDOS DCSS, and 

the CMSVSAM DCSS. The description below illustrates the overall logic 
of that control flow. 



CMS/DOS SVC HANDLING 

There are four CMS/DOS routines that handle VSAM requests: DMSDOS, 

DMSBOP, DMSCLS, and DMSXCP. Within DMSDOS, several SVC functions 

support VSAM requests. These are described in "Simulating a DOS 
Environment Dnder CMS." 



DMSDOS VSAM Processing 

DMSDOS VSAM processing involves handling of SVC 65 (CDLOAD) , which 
returns the address of a specified phase to the caller. DMSDOS searches 
both the shared segment table and the nonshared segment table for the 
CMSDOS and CMSVSAM segments, because both could be in use. Both of 
these segment tables contain the name of each phase comprising that 
segment followed by the fullword address of that phase within the 
segment. 

During SVC 65 processing, DMSDOS checks to see if the address of 
IKQLAB is being requested. IKQLAB is the VSAM routine that returns the 
label information generated by DLBLs and EXTENT cards in DOS/VS systems. 
If this is the case, DMSDOS saves the address of IKQLAB in NUCON for 
later use by DMSXCP. 

If VSAM has not been loaded, a DIAGNOSE 64 (LOADSYS) is issued to 
load the CMSVSAM DCSS. 



DMSBOP VSAM Processing 

When DMSBOP is entered to process ACBs, it checks to see if CMSVSA8 is 
loaded. If VSAM has not been loaded, DIAGNOSE 64 is issued to load the 
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Figure 20. The Relationships in Storage between the Oser Prograi 
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CMSVSAM DCSS. DMSBOP then initializes the transient work area and 
issues a DOS OPEN via SVC 2 to bring the VSAM OPEN $$BOVSAM transient 
into the DOS transient area. 



When VSAM processing completes, control 
directly. 



returns to the user prograa 



DMSCLS VSAM Processing 



DMSCLS processing is nearly the same as processing for DMSBOP. When 
DMSCLS is entered, it checks for an ACB to process. If there is one, 
the $$BCVSAM transient work area is initialized and SVC 2 is issued to 
FETCH the VSAM CLOSE transient $$BCVSAM into the DOS transient area. 
When the VSAM CLOSE routines complete processing, control returns to the 
user program, as in the case of OPEN. 



CMSXCP VSAM Processing 



When DMSXCP processes an EXCP reguest, it determines if the request is 
from IKQLAB (that is, to read the SYSRES label information) . If so, the 
label information area record is filled in from the appropriate DOSCE. 
(DMSXCP determines that the caller is IKQLAB by comparing the address of 
the caller with the address stored in NDCON by DMSDOS, as described 
above. ) 
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Executing a VSAM Function for an OS User 

OS user requests for VSAM services are handled ty DOS/VS VSAM code that 
resides in the CMSVSAM DCSS. To access this code, OS VSAM requests are 
intercepted by the CMS module DMSVIP, the interface between the OS VSAM 
requests and the CMS/DOS and DOS/VS VSAM routines. 

Because DMSVIP is in the CMSVSAM segment, it is available only when 
that segment is loaded- Module DMSVIB, which resides in the CHS 
nucleus, is a bootstrap routine to load the CMSVSAM segment and pass 
control to DMSVIP. 

DMSVIP receives control from VSAM request macros in three ways: via 
SVC (e.g. OPEN and CLOSE), via a direct branch using the address of 
DMSVIP in the ACB, and via a direct branch to the location of DMSVIP 
whose address is 256 bytes into the CMSCVT (CMSCVT is a CMS control 
block that simulates the OS CVT control block) . 

This last technique is used by the code qenerated from the OS VSAM 
control block aanipulati on macro?? {GfffrCB.- SHOWCB. TISTCB, MODCB)„. That 
is, the address at 256 into CVT is assumed to be that of a control block 
that is at displacement XM2* has the address of the VSAM control block 
manipulation routine. To ensure that DMSVIP receives control from these 
requests, the address of DMSVIP is stored at 256 bytes into CMSCVT. 
However, until the CMSVSAM segment is loaded, the address at CMSCVT+256 
is the address of module DMSVIB rather than the address of DMSVIP. The 
address of DMSVIP replaces that of DMSVIB when CMSVSAM is loaded. Both 
DMSVIB and DMSVIP have pointers to themselves at 12 bytes into 
themselves to ensure that this technique works. 

Figure 21 shows the relationships in storage between the user 
program, the OS simulation and interface routines, and the CMSDOS and 
CMSVSAM DCSSs. 
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Figure 21. Relationship in Storage between the User Program, the CS 
Simulation and Interface Routines, and the CMSDOS and 
CMSVSAM DCSSs 



The following description illustrates 
control flow. 



the overall logic of that 
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EHSVIP Processing 

DMSVIP gains control from DMSSOP when an OS SVC 19, 20 or 23 (CLOSE 
TYPE=T) is issued. It also gains control on return from execution of a 
VSAM function, as described belcw. DMSVIP performs five main functions: 

• Initializes the CMS/DOS environment for OS VSAM processing. 

• Simulates an OS VSAM OPEN macro. 

• Simulates an OS VSAM CLOSE macro. 

• Simulates an OS VSAM control block manipulation macro (GENCB, MODCB, 
SHOWCB, Or TESTCB) . 

• Processes OS VSAM I/O macros. 

I nit ializing the CMS/DOS Environment for OS VSAM Processing 

DMSVIP gets control when the first VSAM macro is encountered in the user 
program. Initialization processing begins at this time. The CMSDCS 
BCSS is loaded by issuing the command SET DOS ON (VSAM) . ASSGN commands 
are also issued at this time according to the user-issued DLBL's as 
indicated in the DOSCB chain. Once this initialization completes, 
DMSVIP processes the VSAM request. 

After the initialization, DMSVIP first checks to determine which VSAM 
function is being requested, OPEN, CLOSE, or a control block 
manipulation macro. 

Simulate an OS VSAM OPEN 

For OPEN processing, the DOSSVC bit in NOCON is set on and control 

passes to DMSBOP via SVC 2. Once the CMS/DCS routines are in control, 

execution of the VSAM function is the same as for the DOS VSAM functions 
described above. 

On return from executing the OPEN routine, the address of another 
entry point to DMSVIP, at label DMSVIP2, is placed in the ACB for the 
data set just opened, the DOSSVC bit is turned off, and control is 
passed to DMSSOP, which returns to the user program. DMSVIP2 is the 
entry point for code that performs linkage to the VSAM data management 
phase IKQVSM. This is done after the first OPEN because "it is assumed 
that, once opened, the user performs I/O for the phase, e.g., a GET or 
PUT operation. 

When the linkage routine is entered, the DOSSVC bit is set on and 
control is given to the VSAM data management routine IKQVSM. On return 
from IKQVSM DMSVIP turns off the DOSSVC bit and returns control to the 
user program. (Refer to Simulate OS VSAM I/O Macros in this section.) 



Simulate an OS VSAM CLOSE 

For CLOSE processing, the DOSSVC bit is set on and control is passed to 
the CMS/DOS routine DMSCLS via SVC 2. As in the case of OPEN, once 
control passes to the CMS/DOS routine, execution of the VSAM function is 
the same as for the DOS VSAM functions described above. 
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On return from executing the VSAM CLOSE, the DOSSVC tit is turned off 
and control passes to DMSSOP, which returns to the user program. 



Simulate 9-S £SAM Control Block Manipulation Macros 

DMSVIP simulates the GENCB, MODCB, SHOWCB, and TESTCB control block 
manipulation macros. 

GENCB PROCESSING: When a GENCB macro is issued with BLK=ACB or BLK=EXLST 
specified, the GENCB PLIST is passed unmodified to IKQGEN for execution. 
If GENCB is issued with BLK=SPL and ECB=address specified, the PLIST is 
rearranged to exclude the ECB specification, because DOS/?S does not 
support ECB processing. The GENCB PLIST is then passed to IKQGEN for 
execution. 

MODCB, SHOWCB, AND TESTCB PROCESSING: When MODCB, SHOWCB, or TESTCB is 
issued, the OS ACB, RPL, and EXLST control blocks are reformatted, if 
necessary, to conform to DOS/VS formats. 

For MODCB and SHOWCB, the requests are passed to IKQTMS for 
processing. When MODCB is issued with EXLST= specified, ensure that the 
exit routines return control to entry point DMSVIP3. 

For TESTCB, check for any error routines the user may have specified. 
If the TESTCB specified RPL= and IO=COMPLETE, a not equal result is 
passed to the user. All other TESTCB reguests are passed to DOS and the 
new PSW condition code indicates the results of the test. 

If an error return is provided for TESTCB, the address of DMSVIP4 is 
substituted in the PLIST. This allows DMSVIP to regain control from 
fSAM so that the DOSSVC bit can be turned off. The error routine is 
then given control after the address is returned to the PLIST. 



Siauiit§ QS VSAM I/O Macros 

DMSVIP simulates the OS GET, POT, POINT, ENDREQ, ERASE, and CHECK I/O 
macros. 



GET, POT, POINT, ENDREO., and ERASE Processing: 

First, the OS request code in register is mapped to a DOS/VS request 
code. The RPL or chain of RPLs is rearranged to DOS format (unless that 
has already been done) . 

If there is an ECB address in the OS RPL, a flag is set in the new 
DOS RPL and the ECB address is saved at the end cf the RPL. 

Asynchronous I/O processing is simulated by setting active exit 
returns inactive in the user EXLST. The exception to this is the JRNAD 
exit which need not be set inactive since it is not an error exit. 
Setting error exits to be inactive prevents VSAM from taking an error 
exit, thus allowing such an exit to be deferred until a CHECK can be 
issued for it. 

The DOS macro is then issued via a BALR to IKQVSM. 
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DOS error codes returned in the RPL FDBK field that do not exist in 
OS are mapped to their OS equivalents. If the user has specified 
synchronous processing, this return code is passed unchanged in register 
15. 

For asynchronous processing, return codes are cleared before return 
and any exit routines set inactive are reactivated in the EXLST. Also, 
all ECBs are set to WAITING status. 

CHECK PROCESSING: For CHECK processing, return codes in the RPL FDEK 
field are checked to determine the results of the I/O operation. If 
there is an active exit routine provided for the return code, control is 
passed to that routine. Also, all WAITING ECBs are posted with an 
equivalent completion code. 

If no active exit routine is provided or if the exit routine returns 
to VSAM, the return code is placed in register 15 and control is 
returned to the instruction following the CHECK. 



CMS/VSAM Error Return Processing 

Two types of support for error routine processing are provided in 
DMSVIP. Entry point DMSVIP3 provides support for user exit routines; 
entry point DMSVIP4 provides support for ERET error returns. 

OSER EXIT HOOTINE PROCESSING: DMSVIP provides support for OS VSAM I/O 
error exits at entry point DMSVIP3. At this entry point the DOSSVC bit 
is turned off and the user storage key is restored. 

The address of the user routine is recovered from VIP's saved exit 
list (either the primary exit list in the work area or the overflow exit 
list, OEXLSA) . 

Control then passes to the appropriate exit routine. If the routine 
is one that returns to VSAM, the DOSSVC flag is set ON and VSAM 
processing continues. 

DMSVIP can save the addresses of up to 128 exit routines during 
execution of a user program. 

MIT ERROR ROUTINE PROCESSING: DMSVIP provides support for OS VSAM ERET 
exit routines used in conjunction with the TESTCB macro. This support 
is located at entry point DMSVIP4. At DMSVIP4, the DOSSVC bit is turned 
off and the user storage key is restored. The address of the ERET 
routine is recovered from the work area and control passes to that 
routine. 

The ERET routine may not return control to VSAM. 



COMPLETION PROCESSING FOR OS AND DOS VSAM PROGRAMS 

When an OS or DOS VSAM program completes, control is passed to module 
DMSVSR, which "cleans up" after VSAM. DMSVSR can be called from three 
routines after OS processing: 

• DMSINT, if processing completes without system errors or serious user 
errors. 
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• DMSEXT, if the user program is used as part of an EXEC file. 

• DMSABN, if there are system errors or the user program abnormally 
terminates. 

after DOS VSAM processing completes, DMSVSR is called by DMSDOS. 

DMSVSR issues an SVC 2 to execute the DOS transient routine $$BACLOS. 
$$BACLOS first checks for any OPEH VSAM files. If any are open, SVC 2 is 
issued to $$BCLOSE (DMSCLS) to close the files. 

If there are no open files or if all ACB's have been closed, $$BACLCS 
issues SVC 2 to $$BE0J4, an entry point in DMSVSR. At $$BE0J4, a 
PDRGESYS DIAGNOSE 64 is issued to purge the CMSVSAM DCSS. DMSVSR then 
checks to see if an OS program has completed processing. If this is the 
case, the SET DOS OFF command is issued and control returns to the 
caller. 



OS Simulation by CMS 

When in a CMS environment, a processor or a user-written program is 
executing and utilizing OS-type functions, OS is not controlling this 
action, CMS is in control. Conseguently, it is not OS code that is in 
CMS, but routines to simulate, in terms of CMS, certain OS functions 
essential to the support of OS language processors and their generated 
code. 

These functions are simulated to yield the same results as seen from 
the processing program, as specified by OS program logic manuals. 
However, they are supported only to the extent stated in CHS 
documentation and to the extent necessary to successfully execute OS 
language processors. The user should be aware that restrictions to CS 
functions as viewed from OS exist in CMS. 

Certain TSO Service routines are provided to allow the Program 
Products to run under CMS. The routines are the Command Scan and Parse 
Service Routines and the Terminal I/O Service Routines. In addition the 
user must provide some initialization as documented in TSO TMP Service 
Routine initialization. The OS functions that CMS simulates are shown 
in Figure 22. 



?S0 Service Routine Sjrpjgort 

TSO macros that support the use of the terminal monitor program (TME) 
service routines are contained in TSOMAC MACLIB. The macro functions are 
as described in the TSO TMP documentation with the exception of PDTLINI, 
GETLINE, PUTGET, and TCLEARQ. 

Before using the TSO service routines, the calling program performs 
the following initialization: 

1. Stores the address of the command line as the first word in the 
command processor parameter list (CPPL) . The TSOGET macro puts the 
address of the CPPL in register 1. 

2. Initializes CMS storage using the STRINIT macro. 

3. Clears the ECT field that contains the address of the I/O work area 
(ECTIOHA) . 
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SVC 


OS Macro 


Simulation 


i 


Number 


Function 


Routine 


Comments | 


00 


XDAP 


DMSSVT 


Reads or writes direct access volumes | 


01 


WAIT 


DMSSVN 


; ^aits for an I/C completion | 


02 


POST 


DMSSVN 


! Posts the I/O completion j 


03 


EXIT 


DMSSLN 


Returns from linked phase | 


04 


GETMAIN 


DMSSMN 


Conditionally acquires user free | 
storage j 


05 


FREEMAIN 


DMSSMN 


! Releases user-acquired free storage | 


06 


LINK 


DMSSLN 


Links control tc another lead phase | 


07 


XCTL 


DMSSLN 


Deletes, then links control to another | 
load phase | 


08 


LOAD 


DMSSLN 


Reads another lead phase into storage j 


09 


DELETE 


DMSSLN 


i/6j_stes a xCauSu puase j 


10 


GETMAIN/ 
FREEMAIN 


DMSSMN 


Manipulates free user storage | 




GETPOOL 


DMSSMN 


Simulates an SVC10 | 


11 


TIME 


DMSSVT 


Gets the time of day I 


13 


ABEND 


DMSSAB 


Terminates processing I 


14 


SPIE 


DMSSVT 


Processes program interruptions | 


17 


RESTORE 


DMSSVT 


Effective NOP | 


18 


BLDL/FIND 


DMSSVT 


Manipulates simulated partitioned data | 
files | 


19 


OPEN 


DMSSOP 


Activates a data file | 


20 


CLOSE 


DMSSOP 


Deactivates a data file j 


21 


STOW 


DMSSVT 


Manipulates partitioned directories | 


22 


OPENJ 


DMSSOP 


Activates a data file | 


23 


TCLOSE 


DMSSOP 


Temporarily deactivates a data file ! 


24 


DEVTYPE 


DMSSVT 


Obtains device-type physical I 
characteristics | 


25 


TRKBAL 


DMSSVT 


Effective NOP | 


31 


FEOV 


DMSSVT 


Set forced EOV error code | 


35 


HTC/HTOR 


DMSSVT 


Communicates with the terminal | 


40 


EXTRACT 


DMSSVT 


Effective NOP | 


41 


IDENTIFY 


DMSSVT 


Adds entry to leader table | 


42 


ATTACH 


DMSSVT 


Effective LINK | 


44 


CHAP 


DMSSVT 


Effective NOP | 


46 


TTIMER 


DMSSVT 


Accesses or cancels timer | 


47 


STIMER 


DMSSVT 


Sets timer interval and timer exit | 
routine | 


48 


DEQ 


DMSSVT 


Effective NOP | 


51 


SNAP 


DMSSVT 


Bumps specified storage areas j 


56 


ENQ 


DMSSVT 


Effective NOP | 


57 


F3EEDB0F 


DMSSVT 


Releases a free storage buffer j 


60 


STAE 


DMSSVT 


Allows processing program to decipher | 
abend condition I 


62 


DETACH 


DMSSVT 


Effective NOP | 


63 


CHKPT 


DMSSVT 


Effective HOP I 


64 


RDJFCB 


DMSSVT 


Obtains information from FILEDEF | 
command | 


68 


SYNAD 


DMSSVT 


Handles data set error conditions I 


69 


BACKSPACE 


DMSSVT 


Backs up to the beginning of the | 
previous record | 


- 


GET/POT 


DMSSQS 


Manipulates data records | 


- 


READ/HRITE 


DMSSBS 


Manipulates data blocks I 


— 


NOTE/POINT 


DMSSCT 


Accesses or changes relative track | 
address I 


- 


CHECK 


DMSSCT 


Tests EC3 for completion and errors l 


93 


TGET/TPUT 


DMSSVN 


Terminal processing I 


94 


TCLEARQ 


DMSSVN 


Clears input queue | 


96 


STAX 


DMSSVT 


Adds or deletes an attention exit | 
level | 



Figure 22. OS Functions that CMS Simulates 
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H m Issues the STACK macro to define the terminal as the primary source 
of input. 

CMS Simulation of OS Control Block Functions 

Most of the simulated supervisory OS control blocks are contained in the 
following two CMS control blocks: 

CMSCVT simulates the communication vector table (CVT) . Location 16 
contains the address of the CVT control section. 

CMSCB allocated from system free storage whenever a FILEDEF command or 
an OPEN (SVC 19) is issued for a data set. The CMS control block 
consists of the CMS file Control block (FCB) for the data file 
management under CMS, and simulation of the job file control 
block (JFCB) , input/output block (IOB) , and data extent block 
(DEB). The name of the data set is contained in the FCB, and is 
obtained from the FILEDEF argument list, or from a predetermined 
file name supplied by the processing problem program. 

CMS also utilizes portions of the supplied data control block (DCB) and 
the data event control block (DECS) . The TSO control blocks utilized 
are the command program parameters list (CPPL) , user profile table 
(UPT) , protected step control block (PSCB) , and environment control 
table (ECT) . 

Operating System Simulation Rou tines 

CMS provides a number of routines to simulate certain operating system 
functions used by programs such as the Assembler and the FORTRAN and 
PL/I compilers. Some of the SVC simulation routines are located in the 
disk resident transient module DMSSVT. Whenever one of the SVC routines 
in DMSSVT or is invoked, that routine is loaded into the transient area. 
The following paragraphs describe how these simulation routines work. 

XDAP-SVC 0: Writes and reads the source code spill file, SYSDT1, during 
language compilation for PL/I optimizer and ANS COBOL Compilers. 

WA IT- SVC 1 : Causes the active task to wait until one of more event 
control blocks (ECBs) have been posted. For each specified ECB that has 
been posted one is subtracted from the number of events specified in the 
WAIT macro. If the number of events is zero by the time the last ECB is 
checked control is returned to the user. If the number of events is not 
zero after the last ECB is checked and the number of events is not 
greater than the number of ECBs, the active task is put into a wait 
state until enough ECBs are posted to set the number of events at zero. 
When the event count reaches zero the wait bits are turn off in any ECEs 
that have not been posted and control is returned to the user. If the 
number of events specified is greater than the number of ECBs the system 
abnormally terminates with an error message. All options of WAIT are 
supported. 

PQST-SVC_2: Causes the specified event control block (ECB) to be set to 
indicate the occurrence of an event. This event satisfies the 
requirements of a WAIT macro instruction. All options of POST are 
supported. The bits in the ECB are set as follows: 

Bit Setting 



1 1 

2-7 Value of specified completion code 
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EXIT-SVC 3: This SVC is for CMS internal use only. It is used by the 
CHS routine DMSSLN to acquire an SVC SAYEAREA on return fron an 
executing program that had been given control by LINK (SVC 6) , XTCL (SVC 
7) or ATTACH (SVC 42) . 

GETMAIN-SVC 4: Control is passed to the GETMAIN entry point in the 
DMSSMN storage resident routine. The mode is determined: VU, VC, EC. 
A call is made to GETBLK to obtain the block of storage. Control blocks 
of two fullwcrds precede each section of available storage: (1) the 
address of the next block, (2) the size of this block. The head of the 
pointer string is located at the words MAINSTRT. - initial free block, 
and MAINLIST - address of first link in chain cf free block pointers. 
All options of GETMAIN are supported. 

FRESMAIN-SVC 5: Releases a block of free storage. If the block is part 
of segmented storage, a control block of two fullwords is placed at the 
beginning of the released area. Adjustment is made to include this 
block in the chain of available areas. All options of FREEMAIN are 
supported. 

LI NK -SVC 6 : Program transfer is controlled by the nucleus routine, 
DMSSLN. The LINK macro causes program control to be passed to a 
designated phase. If the COMPSNT bit within the byte OSSFLAGS is on, 
loading is done by calling LOADMOD to bring a CMS MODULE file into 
storage. If this flag is off, dynamic loading is initiated by calling 
LOAD. A GETMAIN is issued to obtain enough storage so that the loader 
(DMSLDR) may relocate the phase in storage, A chain of link request 
blocks is built to record the old SVC PSW, and the location and size of 
the phase storage area. If the routine is already in storage, 
determined by scanning the load request chain, no LOAD or LOADMOD is 
done. Control is passed directly to the routine. CMS ignores the DCB 
and HIARCHY options; all other options of LINK are supported. 

XCTL-SVC 7: XCTL first deletes the current phase from storage. 
Processing then continues as for LINK-SVC 6, as previously described. 
CMS ignores The DCB and HIARCHY options; all other options of XCTL are 
supported. 

iOAD-SVC_8: Control is passed to DMSSLN8 located in DMSSLN when a LOAD 
macro is issued. If the requested phase is not in storage, a LOAD or 
LOADMOD is issued to bring it in. Control is then returned to the 
caller. CMS ignores the DCB and HIARCHY options; all other options of 
LOAD are supported. 

DELETE-SVC 9: Control is passed to DMSSLN9 located in DMSSLN when a 
DELETE macro is issued. Opon entry, DELETE checks to see whether the 
module specified was loaded using LOADMOD or dynamically loaded by LOAD 
or INCLUDE. If it was loaded by LOADMOD control is returned to the 
user. If it was dynamically loaded, the responsibility count is 
decremented by one and if it reaches zero, the storage is released using 
FREEMAIN, and control is returned to the user. All options of DELETE 
are supported. Code 4 is returned in register 15 if the phase is not 
found. 

GETMAIN/FREEMAIN-SVC 10: Control is passed to the SVC 10 entry point in 
DMSSMN. Storage management is analogous to SVC 4 and 5, respectively. 
All options of GETMAIN and FREEMAIN are supported. Subpocl 
specifications are ignored. 
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GETPOOL: Gets control via an OS LINK macro to IECQBFGI. IECQBFGI 
allocates an area of free storage using GETMAIN, sets up a buffer 
control block in the free storage, stores the address of the buffer 
control block in the DCB, and then returns control to the caller. 

TIME-SVC ,11: This routine (TIME) located in DMSSVT receives control 
when a TIME lacro instruction is issued. A call is made (by SIO or 
DIAGNOSE) to the RPQ software chronological timer device, X'OFF 1 . The 
real time of day and date are returned to the calling program in a 
specified form: decimal (DEC) binary (BIN), or timer units (TO). All 
options of TIME except hundredths of a second MIC are supported. 

A1MD-S VC__1 3 : This routine (DMSSAB) receives control when either an 
AEEND macro or an unsupported OS/360 SVC is issued. If an SVC 13 was 
issued with the DUMP option and either a SYSDDDMP or SYSABEND ddname had 
been defined via a call to DMSFLD (FILEDEF) , a SNAP (SVC 51) specifying 
PDATA=ALL is issued to dump user storage to the defined file. A check 
is made to see if there are any outstanding STAE requests. If not, or 
if an unsupported SVC was issued, DMSCWR is called to type a descriptive 
error message at the terminal. Next, DMSCWT is called to wait until all 
terminal activity has ceased, and then, control is passed to the ABEND 
recovery routine. If a STAE macro was issued, a STAE work area is built 
and control is passed to the STAE exit routine. After the exit routine 
is complete, a test is made to see if a retry routine was specified. If 
so, control is passed to the retry routine. Otherwise, control passes 
to DMSABN unless the task that had the ABEND was a subtask. In that 
case, the resume PSH in the link block for the subtask is adjusted to 
point to an EXIT instruction (SVC 3) . The EXIT frees the subtask, and 
the attaching task is redispatched. 

SPIE-SVC 14: This routine (SPIE) receives control when a SPIE macro 
instruction is issued. When it gets control, SPIE inserts the new 
program interruption control area (PICA) address into the program 
interruption element (PIE) . The program interruption element resides in 
the program interruption handler (DMSITP) . It then returns the address 
of the old PICA to the calling program, sets the program mask in the 
calling program's PSW, and returns to the calling program. All options 
of SPIE are supported. 

RESTORE-SVC 17: RESTORE is a NOP located in DMSSVT. 

BLDL/FIND (Type D)_-SVC 18: SVC to entry points in DMSSOP. If an OS disk 
is specified, DMSSVT branches and links to DMSROS. See BLDL and FIND 
under description of BPAM routines in DMSSVT. 

STOW-SVC 21 ; See STOW under description of BPAM routines in DMSSVT. 

OPEN/OPENJ-SVC 19/22: OPEN simulates the data management function of 
opening one or more files. It is a nucleus routine and receives control 
from DMSITS when an executing program issues an OPEN macro instruction. 
The OPEN macro causes an SVC to DMSSOP. DMSSOP simulates the OPEN 
macro. The DISP and SDBACK options are ignored by CMS; all other 
options of OPEN and OPENJ are supported. 

CLOSE/TCLOSE-SVC 20/23: CLOSE and TCLOSE are simulated in the nucleus 
routine DMSSOP. It receives control whenever a CLOSE or TCLOSE macro 
instruction is issued. The CLOSE macro causes an SVC to DMSSOP. DMSSCP 
simulates the CLOSE macro. CMS ignores the DISP option; all other 
options of CLOSE and TCLOSE are supported. 

DEVTYPE-SVC 24: This routine (DEVTYPE) , located in DMSSVT, receives 
control when a DEVTYPE macro is issued. Upon entry, DEVTYPE moves 
Device Characteristic Information for the requested data set into a user 
specified area, and then returns control to the user. All options of 
DEVTYPE are supported, except EPS, which is ignored. 
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TRKB AL^S VC_25 : TRKBAL is a NOP located in DMSSVT. 

FEOV-SVC 31: Returns control to CMS with an error code of 4 in register 
15. 

WT0^WT0R_^S?C_3 5 : This routine (WTO) , located in DMSSVT, receives 
control when either a WTO or a WTOR nacro instruction is issued. For a 
WTO, it constructs a calling sequence to the DMSCWR function program to 
type the message at the terminal. (The address of the message and its 
length are provided in the parameter list that results from the 
expansion of the WTO macro instruction.) It then calls the DMSCHT 
function program to wait until all terminal I/O activity has ceased. 
Next, it calls the DMSCWR function program to type the message at the 
terminal and returns to the calling program. All options of WTO and 
WTOR are supported except those concerned with multiple console support. 

For a WTOR macro instruction, this routine proceeds as described for 
WTO. However, after it has typed the message at the terminal it calls 
the DMSCRD function program to read the user's reply from the terminal. 
When the user replies with a message, it moves the message to the buffer 
specified in the WTOR parameter list, sets the completion bit in the 
ECB, and returns to the calling program. 

JXTR ACT- S VC_4 : This routine (EXTRACT), located in DMSSVT receives 
control when an EXTRACT macro is issued. Upon entry, EXTRACT clears the 
user provided answer area and returns control to the user with a return 
code of 4 in register 15. 

IDENT IFY-S VC_ 4 1 : Located in DMSSVT, this routine creates a new load 
request block with the requested name and address if both are valid. The 
new entry is chained from the existing load request chain. The new name 
may be used in a LINK or ATTACH macro. 

ATTA CH- S VC_4 2 : Located in DMSSLN, ATTACH operates like a LINK (SVC 6), 
with additional capabilities. The user is allowed to specify an exit 
address to he taken upon return from the attached phase; also, an ECB is 
posted when the attached phase has completed; and a STAI routine can be 
specified in case the attached phase abends. The DCB, LPMOD, DPMOD, 
HIARCHY, GSPV, GSPL, SHSPV, SHSPL, SZERO, PURGE, ASYNCH, and TASKLIB 
options are ignored; all other options of ATTACH are supported. Because 
CMS is not a multitasking operating system, a phase requested by the 
ATTACH macro must return to CMS. 

CHAPz§K_M*. CH AP is a NOP located in DMSSVT. 

TTIM ER^S VC_4 6 : Checks to ensure that the value in the timer (hex 
location 50) was set by an STIMER macro. If it was, the value is 
converted to an unsigned 32 bit binary number specifying 26 microsecond 
units and is returned in register 0. If the timer was not set by an 
STIMER macro a zero is returned in register 0, after setting register 0, 
the CANCEL option is checked. If it is not specified, control is 
returned to the user. If it is specified, the timer value and exit 
routine set by the STIMER macro are cancelled and control is returned to 
the user. All options of TTIMER are supported. 

STIMER -SVC H7 : Checks to see if the WAIT option is specified. If so, 
control is returned to the user. If not, the specified timer interval 
is converted to 13 microsecond units and stored in the timer (hex 
location 50). If a timer completion exit routine is specified, it is 
scheduled tc be given control after completion of the specified time 
interval. If not, no indication of the completion of the time interval 
is scheduled. After checking and handling any specified exit routine 
address, control is returned to the user. All options of STIMER are 
supported. The TASK option is treated as though the REAL option had 
been specified. 
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DEQ-SVC_J£8: DEQ is a NOP located in DMSSVT. 

SNAP-SYC 51; Control is passed to SNAP in DMSSVT when a SNAP macro is 
issued. SNAP fills in a PLIST with a beginning and ending address and 
calls DMPEXEC. DMPEXEC dumps the specified storage along with the 
registers and low storage to the printer. Control is then returned to 
SNAP and SNAP checks to see if any more addresses are specified. It 
continues calling DMPEXEC until all the specified addresses have been 
dumped to the printer. Control is then returned to the user. Except 
for SDATA, PDATA, and DCB, all options of the SNAP macro are processed 
normally. SDATA and PDATA are ignored. Processing for the DCB option 
is as follows: The DCB address specified with SNAP is used to verify 
that the file associated with the DCB is open. If it is not open, 
control returns to the caller with a return code of 4. If the file is 
open, the FCB associated with the file is checked for a device type of 
DDMMY. If the device type is DUMMY, control returns to the caller with 
a return code of and storage is not dumped. 

2N2zSIC_56: ENQ is a NOP located in DMSSVT. 

FR JEDBU F Z S VC_5 7 : This routine (FREEDBOF) located in DMSSVT receives 
control when a FREEDB'JF aacro is issued. Upon entry, FREEDBUF sets up 
the correct DSECT registers and calls the FREEEBUF routine in DHSSBD. 
This routine returns the dynamically obtained buffer (BDAM) specified in 
the DECB to the DCB buffer control block chain. Control is then 
returned to the DMSSVT routine which returns control to the user. All 
the options of FREEDBUF are supported. 

STAE-SVC 60: This routine (STAE) located in DMSSVT receives control 
when a STAE macro is issued. Upon entry, STAE creates, overlays or 
cancels a STAE control block (SCB) as requested. Control is then 
returned to the user with one of the following return codes in register 
15: 

Code Meaning 

00 An SCB is successfully created, overlaid or cancelled. 
08 The user is attempting to cancel or overlay a nonexistent 
SCB. 

Format of SCB 

0(0) , , 

|0 or pointer to next SCB | 
4(4) | , 

I exit address | 

8(8) \ 1 

I parameter list address | 
12(C) • » 

DETACH-S VC_62 : DETACH is a NOP located in DMSSVT. 

CHKPT-SVC 63: CHKPT is a NOP located in DMSSVT. 

RDJFCB-SVC 64: This routine (RDJFCB) receives control when a RDJFCB 
macro instruction is issued. When it gets control, RDJFCB obtains the 
address of the JFCB from the DCBEXLST field in the DCB and sets the JFCB 
to zero. It then reads the simulated JFCB located in CMSCB that was 
produced by issuing a FILEDEF into the closed area. RDJFCB calls the 
STATE function program to determine if the associated file exists. If 
it does, RDJFCB returns to the calling program. If the file does not 
exist, RDJFCB sets a switch in the DCB to indicate this and then returns 
to the calling program. RDJFCB is located in DMSSVT. All the options 
of RDJFCB are supported. 
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Note: The switch set by the RDJFCB is tested by the FORTRAN object-time 
direct-access handler (DIOCS) to determine whether or not a referenced 
disk file exists. If it does not, DIOCS initializes the direct access 
file. 

SYN AD-SVC_6 8 : Located in DMSSVT, SYNAD attempts to simulate the 
functions SYNADAF and SYNADRLS. SYNADAF expansion includes an SVC 68 
and a high-order byte in register 15 denoting an access method. SYNAD 
prepares an error message line, swap save areas and register 13 
pointers. The message buffer is 120 bytes: bytes 1-50, 84-119 blank; 
bytes 51-120, 120S INPUT/OOTPDT ERROR nnn ON FILE: "dsname"; where 
nnn is the CMS RDBUF/WRBUF error code. All the options of SYNAD are 
supported. 

SYNADRLS expansion includes SVC 68 and a high order byte of X'FF 1 in 
register 15. The save area is returned, and the message buffer is 
returned to free storage. 

BACKSPACE-SVC 69: Also in DMSSVT. For a tape, a BSR command is issued 
to the tape. For a direct access data set, the CMS write and read 
pointers are decremented by one. control is passed to BACKSPACE in 
DMSSVT when a BACKSPACE macro is issued. BACKSPACE decrements the read 
write pointer by cne and returns control to the user. No physical tape 
or disk adjustments are made until the next READ or WRITE macro is 
issued. All the options of BACKSPACE are supported. 

TGET/TPDT-SVC 93: Located in DMSSVN, this routine receives control when 
a TGET or TPDT macro is issued. It is provided to support TSO service 
routines needed by program products. TGET reads a terminal line; TPOT 
writes a terminal line. The return code is zero if the operation was 
successful and a four if an error was encountered. 

TCLEARQ-SVC 94: TCLEARQ is located in DMSSVN and causes the terminal 
input queue to be cleared via a call to DESBOF. At completion a return 
is made to the user. 

ST AX- SVC 96: Located in DMSSVT, STAX gets and chains a CMSTAXE control 
block for each STAX SVC issued with an exit routine address specified. 
The chain is anchored by TAXEADDR in DMSNDC. If no exit address is 
specified the most recently added CMSTAXE is cleared from the chain. If 
an error occurs during STAX SVC processing, a return code of eight is 
placed in register 15. The only option of STAX which may be specified is 
EXIT ADDRESS. 

GET/POT: See the DMSSQS prolog for description. 

READ/WRITE: OS READ and WRITE macros branch and link to DMSSBS. DMSSES 
branches and links to DMSSEB and, if the disks is an OS disk, DMSSEB 
branches and link to DMSROS. See DMSSBS for description. 

NOTE/PO INT/FIND Jty_pe_Cl : OS NOTE, POINT, and FIND (type c) macros 
branch and link to entry points in DMSSCT. If the disk is an OS disk, 
DMSSCT tranches and links to DMSROS. See DMSSCT for descriptions. 

CHECK: See the DMSSCT prolog for description. 
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Notes on using the OS simulation routines: 

• CMS files are physically blocked in 800-byte blocks, and logically 
blocked according to a logical record length. If the filemode of the 
file is not 4, the logical record length is egual to the DCBLRECL and 
the file Bust always be referenced with the same DCBLRECL, whether or 
not the file is blocked. If the filemode of the file is 4, the 
logical record length is equal to the DCBBLKSI and the file must 
always be referenced with the same DCBBLKSI. 

• When writing CMS files with a filemode number other than four, the CS 
simulation routines deblock the output and write it on a disk in 
unblocked records. The simulation routines delete each 4-byte block 
descriptor word (BDW) and each 4-byte record descriptor word (RDW) of 
variable length records. This makes the OS-created files compatible 
with CMS-created files and CMS utilities. When CMS reads a CMS file 
with a filemode number other than four, CMS blocks the record input 
as specifies and restores the BDW and RDW control words of variable 
length records. 

If the CMS filemode number is four, CMS does not unblock or delete 
bDWs or KDHs on output. CMS assumes on input that the file is 
blocked as specified and that variable length records contain block 
descriptor words and record descriptor words. 

• To set the READ/WRITE pointers for a file at the end of the file, a 
FILEDEF command must be issued for the file specifying the MCD 
option. 

• A file is erased and a new one created if the file is opened and all 
the following conditions exist: 

— The OUTPUT or OUTIN option of OPEN is specified. 

— The TYPE option of OPEN is not J. 

— The dataset organization option of the DCE is not direct access or 
partitioned. 

— A FILEDEF command has not been issued for data set specifying the 
MOD option. 

• The results are unpredictable if two DCBs read and write to the same 
data set at the same time. 



Command Flow of Commands Involving OS Access 

ACCESS COMMAND 11Q1'* The module DMSACC gets control first when you 
invoke the ACCESS command. DMSACC verifies parameter list validity and 
sets the necessary internal flags for lat^r use. If the disk you access 
specifies a target mode of another disk currently accessed, DMSACC calls 
DMSALU to clear all pertinent information in the old active disk table. 
DMSACC then calls DMSACF to bring in the user file directory of the 
disk. As scon as DMSACF gets control, DMSACF calls DMSACM to read in 
the master file directory of the disk. Once DMSACM reads the label cf 
the disk, and determines that it is an OS disk, DMSACM calls DMSROS 
(ROSACC) to complete the access of the OS disk. Upon returning from 
DMSROS, DMSACM returns immediately to DMSACF, bypassing the master file 
directory logic for CMS disks. DMSACF then checks to determine if the 
accessed disk is an OS disk. If it is an OS disk, DMSACF returns 
immediately to DMSACC, bypassing all the user file directory logic for 
OS disks. DMSACC checks to determine if the accessed disk is an CS 

2-130 IBM VM/370 System Logic and Program Determination — Volume 2 



disk; if it is, another check determines if the accessed disk replaces 
another disk to issue an information message tc that effect. Another 
check determines if you specified any options or fileid and, if you did, 
a warning message appears on the terminal. Control now returns to the 
calling routine. 

FILEDEF COMMAND FLOW: DMSFLD gets control first when you issue a CBS 
FILEDEF command. DMSFLD adds, changes, or deletes a FILEDEF control 
block (CKSCB) and returns control to the calling routine. 

LISTDS COMMAND FLOW: The module DMSLDS gets control first when you 
invoke the LISTDS command. DMSLDS verifies parameter list validity and 
calls module DMSLAD to get the active disk tatle associated with the 
specified mode. DMSLDS reads all format 1 DSCB and if you specified the 
PDS option and the data set is partitioned, DMSLDS calls DMSBCS 
(ROSFIND) to get the members of the data set. After displaying the DSCB 
(or DSCB) on you console, DMSLDS returns to the calling routine. 

MOVEFILE COMMAND ZkQ!'- The module DMSMVE gets control first when you 
issue a CMS MOVEFILE command. DMSMVE calls DMSFLD to get an input and 
output CMSCB and, if the input DMSCB is for a disk file, DMSMVE calls 
DMSSTT to verify the existence of the input file and get default DCB 
parameters in absence of CMSCB DCB parameters. DMSMVE uses OS OPEN, 
FIND, GET, PDT, and CLOSE macros to move data from the input file to the 
output file. After moving the specified data, control returns to the 
calling routine. 

QUERY COMMAND FLOW: The module DMSQRY gets control first when you invoke 
the QUERY command, DMSQRY verifies parameter list validity and calls 
DMSLAD to get the active disk table associated with the specified mode. 
DMSQRY displays all the information that you reguested on your console. 
When DMSQRY finishes, control returns to the calling routine. 

RELEASE COMMAND FLOW: The module DMSARE gets control first when you 
invoke the RELEASE command. DMSARE verifies parameter list validity and 
checks to determine if the disk you want to release is accessed. If the 
disk you want to release is currently active, DMSARE calls DMSALU to 
clear all pertinent information associated with the active disk. DMSALD 
first checks the active disk table for any existing CMS tables kept in 
free storage. If the disk you want to release is an OS disk, DMSALU 
does not find any tables associated with a CMS disk. If the disk is an 
OS disk, DMSALU releases the OS FST blocks (if any) and clears any OS 
FST pointers in the OS file control blocks. DMSALU then clears the 
active disk table and returns to DMSARE. DMSARE then clears the device 
table address for the specified disk and returns to the calling routine. 

STATE COMMAND FLOW: The module DMSSTT gets control first when you invoke 
the STATE command. DMSSTT verifies the parameter list validity and 
calls module DMSLAD to get the active disk table associated with the 
specified mode. Upon return from DMSLAD, DMSSTT calls DMSLFS to find 
the file status table (FST) associated with the file you specified. 
Once DMSLFS finds the associated FST, it checks to determine if the file 
resides on an OS disk. If it does, DMSLFS calls DMSROS (ROSSTT) to read 
the extents of the data set. Upon return from DMSROS, DMSLFS returns to 
DMSSTT. DMSSTT then copies the FST (or OS FST) to the FST copy in 
statefst and returns to the calling routine. 



OS Access Method Modules — Logic Description 

DMSACC MODULE: Once DMSACC determines that the disk you want to access 
is an OS disk, it bypasses the routines that perform LOGIN UFD and LOGIN 

ERASE. 
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If the disk you want to access replaces an OS disk, message DMSACC724I 
appears at your terminal. 

If you specified any options or fileid in the ACCESS command to an OS 
disk, a warning message, DMSACC230W, appears to notify you that such 
options or fileid were ignored. DMSACC returns to the calling routine 
with a warning code of 4. 

DMSACF MODULE: DMSACF verifies that the disk you want to access is an CS 
disk and, if it is, exits immediately. 

EMSACM MODOLE: DMSACM saves the disk label and VTOC address in the ADT 
block if the disk is an OS disk. DMSACM checks to determine if a 
previous access to an OS disk loaded DMSROS. If not, DMSACM calls 
DMSSTT to verify that DMSROS text exists. Opon successful return from 
STATE, DMSACM loads DMSROS text into the high storage area with the same 
protect key and calls the OS access routine (ROSACC) of DMSROS to read 
the format 4 DSCB of the disk. Upon successful return from DMSROS, 
control returns to the calling routine. Any other errors are treated as 
general logon errors. 

DMSALU MODULE: If the disk is an OS disk, DMSFRET returns the OS FST 
blocks (if any) to free storage. DMSALD clears the OS FST pointer in 
all active OS file control blocks, decrements the DMSROS usage count 
and, if the usage count is zero, clears the address of DMSROS in the 
nucleus area. DMSALU also calls DMSFRET to returns to free storage the 
area which DMSROS occupies. 

DM SA RE MODULE: DMSARE ensures that the disk you want to relase is an OS 
disk. DMSARE calls DMSALU to release all OS FST blocks and, if 
necessary, to free the area DMSROS occupies. Upon return from DMSALU, 
DMSARE clears the common CMS and OS active disk table. 

MSFLD MODULE 

• DSN — If you specify the parameter DSN as a question mark (?) , 
FILEDEF displays the message DMSFLD220R to request you to type in an 
OS data set name with the format Q1.Q2.QN. Q1, Q2, and QN are the 
qualifiers of an OS data set name. If you specify the parameter DSN 
as Q1.Q2.QN, FILEDEF assumes that Q1, Q2, and QN are the qualifiers 
of an OS data set name, and stores the qualifiers with the format 
Q1.Q2.QN in a free storage block and chains the block to the FCB. 

• CONCAT — If you specify the CONCAT option, IILEDEF assumes that the 
specified FILEDEF is unique unless a filedef is outstanding with a 
matching ddna'me, filename, and filetype. This allows you to specify 
more than one FILEDEF for a particular ddname. The CONCAT option 
also sets the FCBCATML bit in the FCB to allow the CS simulation 
routine to know the FCB is for a concatenated MACLIB. 

• MEMBER — If you specify the member option, filedef stores the member 
name in FCBMEMBR in the FCE to indicate that the OS simulation 
routine should set the read/write pointer to point to the specified 
BPAM file member when OPEN occurs. 

DMSLDS MODULE: DMSLDS saves the return register, sets itself with the 
nucleus protection key, clears the dsname key, and initializes its 
internal flag. 

DMSLDS verifies parameter list validity. The data set name must not 
exceed 44 characters, and the disk mode (the last parameter before the 
options) must be valid. DMSLDS joins the quailifiers with dots (.) to 
form valid data set names. If you specify the data set name as a 
question mark (?) , DMSLDS prompts you to enter the dsname in exactly the 
same form as the dsname which appears on the disk. 
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DMSLDS calls DHSLAD to find the active disk table block. If you 
specify filemode as an asterisk (*) , DMSLAD searches for all ADT blocks. 
If you specify the filemode as alphabetic, DMSLAD finds only the ACT 
block for the specified filemode. 

If you specify the dsname (which is optional) , DMSLDS sets the 
channel programs to read by key. If you did not specify a dsname, 
DMSLDS searches the whole VTOC for format 1 DSCES and displays all the 
requested information contained in the DSCB on your console. If you 
specify the format option, the RECFM, LRECL, ELKSI, DSCRG, DATE, LABEL, 
FMODE, and data set name appear on you console; otherwise, only the 
FMODE and data set name appear. 

If you specify the PDS option, DMSLDS calls the 'find* routine 
(rosfind) in DMSROS to read the member directory and pass back, one at a 
time, in the fcbmembr field of CMSCB the name of each member of the data 
set. This occurs if the data set is partitioned. 

After processing finishes, DMSLDS resets the nucleus key to the same 
value as the user key, puts the return code in register 15, and returns 
to the calling routine. 

DMSLFS MODULE: DMSLFS verifies that the FST being searched for has an CS 
disk associated with it. DMSLFS calls the DMSROS state routine (ROSSTT) 
to verify that the data set exists and CMS supports the data set 
attributes. Opon return from DMSROS, a return code of 88 indicates that 
the data set was not found, and DMSLDS starts the search again using the 
next disk in sequence. Any other errors, such as a return code 80, 
cause DMSLFS to exit immediately. A return code of from DMSRCS 
indicates that the data set is on the specified disk. From this point 
on, execution occurs common to both CMS and OS disks. 

MSMVE_ MODULE: If you specify the PDS option and the input is from a 
disk, DMSMVE sets the FCBMVPDS bit and issues an OS FIND macro before 
opening an output DCB to position the input file at the next member. 
DMSMVE then stores the input member name in the output CMSCB for use as 
the output filename. After reaching end-of-file on a member, the 
message DMSMVE225I appears, DMSMVE closes the output DCB, and passes 
control to find the next member. After moving all the members to 
separate CMS files, movefile displays message DMSMVE226I, closes the 
input and output DCBS, and returns control to the calling routine. 

DMSROS MODULE: 

• ROSACC Routine — ROSACC gets control from DMSACM after DMSACH 
determines that the label of the disk belongs to an OS disk. The 
ROSACC routine reads the format 4 DSCB of the disk to further verify 
the validity of the OS disk. ROSACC updates the ADT to contain the 
address of the high extent of the VTOC (if the disk is a DOS disk) or 
the address of the last active format 1 DSCE (if the disk is an CS 
disk) , and the number of cylinders in the disk. If the disk is a DCS 
disk, ROSACC sets a flag in the ADT. Information messages appear to 
notify you that the disk was accessed in read-only mode. If the disk 
is already accessed as another disk, another information message 
appears to that effect. Finally ROSACC zeroes out the ADTFLG1 flag 
in the ADT, sets the ADRFLG2 flag to reflect that an OS disk was 
accessed, and returns control to the calling routine. 

• ROSSTT Routine — Verifies the existence of an CS data set and 
verifies the support of the data set attributes. 

Note: Within the ROSSTT description, any reference to FCB or CMSCB 
implies a DOSCB if DOS is active. 
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ROSSTT gets control from DMSSTT after DMSSTT determines that the 
STATE operation is to an OS disk. The ROSSTT routine searches for 
the correct FCB which a previous FILEDEF associated with the data 
set. If the DOS environment is active, ROSSTT locates the correct 
DOSCB that defines a data set described by a previous DLBL. If 
ROSSTT finds an active FST, control passes to ROSSTRET; otherwise, 
ROSSTT acquires the dsname block, places its address in the FCE, and 
moves the dsname in the FCB to the acquired block. ROSSTT acquires 
an FST block, chains it to the FST chain, and fills all general 
fields (dsname, disk address, and disk mode) . ROSSTT now reads the 
format 1 DSCB for the data set and checks for unsupported options 
(BDAM, ISAM, VSAM, and read protect) . 

Errors pass control back to the calling routine with an error cede. 
ROSSTT groups together all the extents of the data set (by reading 
the format 3 DSCB if necessary) and checks them for validity. ROSSTT 
bypasses any user labels that may exist and displays a message to 
that effect. Next, ROSSTT moves the DSCE1 ELKSIZE, LRECL, and RECF3 
parameters to the OS FST and passes control to rosstret. 

• ROSSTRET Routine — If the di<=;lc i « n r>t a DOS disk, rcsstrct passes 
control tack to the caller. If the specified disk is a DOS disk, 
rosstret fills in the OS FST BLKSIZE, LRECL, and RECFM fields that 
were not specified in the DSCB1. If the CMSCB fields are zerc, 
rosstret defaults them to BLKSIZE=32760, LRECL=32670, and RECFH=D. 
Control then returns to the calling routine. 

• ROSRPS Routine — ROSRPS reads the next record of an OS data set. 
Upon entry to the ROSRPS entry point, ROSRPS calls CHKXTNT and, if 
the current CCHHR is zero, SETXTNT to ensure the CCHHR and extent 
boundaries are correctly set. ROSRPS then calls DISKIO and, if 
necessary, CHKSENSE and GETALT to read the next record. If no errors 
exist or an unrecoverable error occurred, control returns to the user 
with either a zero (I/O OK) or an 80 (I/O error) in register 15. If 
an unrecoverable error occurs, ROSRPS updates the CCWS and buffer 
pointers as necessary and recalls CHKXTNT and DISKIO to read the next 
record. 

• ROSFIND Routine — ROSFIND sets the CCHHR to point to a member 
specified in FCBMEMBR or, if the FCBMVPDS bit is on, sets the CCHHR 
to point to the next member higher than FCBMEMBR and sets a new 
member name in FCBMEMBR. 

Opon entry at the ROSFND entry point, ROSFND sets up a CCW to search 
for a higher member name if the FCBMVPDS tit is on, or an equal 
member name if the FCBMVPDS bit is off. It then calls SETXTNT, 
DISKIO and, if needed, CHKSENSE and GETALT to read in the directory 
block that contains the member name requested. After reading the 
block, it is searched for the requested memher name. If the member 
name is not found, an error code 4 returns to the calling routine. 
If an I/O error occurs while trying to read the PDS block, an error 
code 8 returns to the calling routine. If the member name is found, 
TTRCNVRT is called to convert the relative track address to a CCHH 
and pass the address of the member entry to the calling routine. 

• ROSNTPTB Routine — ROSNTPTB gets the current TTR, sets the current 
CCHHR to the value of the TTR, and backspaces to the previous record. 

Upon entry at the ROSNTPTB entry point, ROSNTPTB checks to determine 
if a NOTE, POINT, or BSP operation was reguested. 

If register is zero, NOTE is assumed. The note routine calls 
CBRCNVRT to convert the CCHH to a relative track and returns control 
to the calling routine with the TTR in register 0. 

2-134 IBM VM/370 System Logic and Program Determination — Voluse 2 



If register is positive upon entry into DMSROS, POINT is assumed 
and ROSNTPTB loads a TTR from the address in register and calls 
TTRCNVRT and SETXTNT to convert the TTR to a CCHHR. Then control 
returns to the calling routine. 

If register is negative upon entry into DMSROS, BSP (BACKSPACE) is 
assumed. The backspace code checks to determine if the current 
position is the beginning of a track. If not, the backspace code 
decrements the record number by one and control then returns to the 
calling routine. If the current position is the beginning of a 
track, the backspace code calls CHRCNVRT to get the current CCHH. 
The backspace code then calls rdcnt to get the current record number 
of the last record on the new track, calls setxtnt to set the new 
extent boundaries, and returns control to the calling routine. 

DMSSCT MODULE: 

• NOTE Routine — Upon entry to note, DHSSCT checks to determine if the 
DCB refers to an OS disk. If it does, DMSSCT calls DMSROS (ROSNTPTE) 
to get the current TTR. Control then returns to the user. 

• POINT Routine — Upon entry to point, DMSSCT checks to determine if 
the DCB refers to an OS disk. If it does, DMSSCT calls DMSRCS 

(ROSNTPTB) to reset the current TTR, calls CKCONCAT and returns 
control to the calling routine. 

• CKCONCAT Routine — Upon entry to CKCONCAT, DHSSCT checks to 
determine if the FCB MACLIB CONCAT bit is on. If it is on, 
DCBRSLAD+3 sets the correct OS EST pointer in the FCB and returns 
control to the calling routine. If the ECS MACLIB CCNCAT bit is off, 
control returns to the calling routine. 

• FIND (type_C) Routine — If the DCB refers to an OS disk, DMSSCT 
calls DMSROS (ROSNTPTB) to update the TTR and control returns to the 
calling routine. 

DMSSEB MODULE: 

• EOEROUTN Routine — If the FCB OS bit is on, control passes to 
OSREAD. Otherwise, if no special I/O routine is specified in 
FCBPROC, control passes to E0B2 in DMSSEB. 

• OSREAD Routine — DMSSEB calls DMSROS to perform a read or write and 
then control passes to EOBRETRN which, in turn, passes control back 
to DMSSBS. DMSSBS passes control back to the routine calling the 
read or write macro operation. 



DMSSOP MODULE — If the MACLIB CONCAT option is on in the CMSCB, OPEN 

checks the MACLIB names in the global list and fills in the addresses of 

OS FSTS for any MACLIBS on OS disks. The CMSCB of the first MACLIB in 
the global list merges and initializes CMSCBS. 

If the CMSCB refers to a data set on an OS disk, DMS5CP checks to ensure 
that the data set is accessible and the DCB dees not specify output, 
BDAM, or a key length- If any errors occur, error message DMSSOP036E 
appears and DMSSOP does not open the DCB. DMSSOP fills them in from the 
OS FST for the data set. 
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If the CMSCB fcbmembr field contains a member name (filled in by FILEDEF 
with the member option) , DMSSOP issues an OS FIND macro to position the 
file pointer to the correct member. If an error occurs on the call to 
the FIND macro, error message DMSSOP036E appears and DMSSOP does not 
open the DCB. 



DMSSVT MQDOLE: 

• BSP (backspace) Routine — Upon entry, backspace checks for the FCB 
OS bit. If it is on, the BSP routine calls DMSROS (ROSNTPTB) to 
backspace the TTR and control returns to the calling routine. 

• FIND (type_D) Routine — Upon entry to find, the find routine checks 
the FCB OS bit. If it is on, the FIND routine takes the OS FST 
address from the CMSCB or, if the CONCAT bit is on, from the global 
MACLIB list. The FIND routine then calls EHSROS (ROSFIND) to find 
the member name and TTR. DMSROS searches for a matching member name 
or, if the FCBMVPDS option is specified, a higher member name. If 
ths DKSSCS return cede it. ui 8, ot if the rCBCATnL bit: is not on, 
control returns to the calling routine with the return code from 
DMSROS. If the return code is 4 and the FCBCATML bit is on, DMSSvT 
checks to determine if all the global MACLIBS were searched. If they 
were, control returns to the calling routine with the DMSROS return 
code. If they were not, DMSSVT issues the FIND on the next MACLIB in 
the global list. 

• BLDL Routine — BLDL list = FF LL NAME TTR KZC DATA 

If the DCB refers to an OS disk, the BLDL routine fills in the TTR, 
C-byte and data field from the OS data set. 



DMSQRY MODULE: 

• SEARCH Routine — The search routine ensures that any OS disk 
currently active is included in the search order of all disks 
currently accessible. 

• DISK Routine — The disk routine displays the status of any or all CS 
disks using the following form: 

1 MODE(CUU): (NO. CYLS-), TYPE R/O - OS.* 

DMSSTT MODULE — DMSSTT verifies that the disk being searched is an OS 
disk. DMSSTT calls DMSLFS to get the FST associated with the data set. 
Upon return from DMSLFS, DMSSTT checks the return code to ensure that 
CMS supports the data set attributes. A return code of 81 or 82 
indicates that CMS does not support the data set and message DMSSTT229E 
occurs to that effect. DMSSTT then clears the FST copy with binary 
zeros, and moves the filename, filetype, filemode, BLKSIZE, LRECL, 
RICFM, and flag byte to the FST copy. From this point on, common code 
execution occurs for both CMS and OS disks. 



Routines Common to All of DMSROS 

• CHRCNVRT Routine — The CHRNCVRT routine converts a CCHH address to a 
relative track address. 
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• CHKSENSE Routine — CHKSENSE checks sense bits to determine the 
recoverability of a unit check error if one occurs. 

• CHKXTNT Routine — CHKXTNT checks to determine if the end of split 
cylinder or the end of extent occurred, and, if so, updates to the 
next split cylinder or extent. 

• DISKIO Routine — DISKIO starts I/O operation on a CCW string via a 
DIAGNOSE X»20». 

• GETALT Routine — GETALT switches reading from alternate track to 
prime track, and from prime track to alternate track. 

• RDCNT Routine — RDCNT reads count fields on the track to determine 
the last record number on the track. 

• SETXTNT Routine — SETXTNT sets OSFSTEHD to the value of the end of 
the extent and, if a new extent is specified, sets CCHHR to the value 
of the start of the extent. 



Simulating a DOS Environment under CMS 

CMS/DOS is a functional enhancement to CMS that provides DCS 
installations with the interactive capabilities of a VM/370 virtual 
machine. CMS/DOS operates as the background DOS partition; the other 
four partitions are unnecessary, since the CMS/DOS virtual machine is a 
one-user machine. 

CMS/DOS provides read access to real DOS data sets, but not write or 
update access. Real DOS private and system relocatable, source 
statement, and core-image libraries can be read. This read capability is 
supported to the extent required to support the CHS/DOS linkage editor, 
the DOS/PLI and DOS/VS COBOL compilers, the FETCH routine, and the 
RSERV, SSERV, and ESERY commands. No read or write capatility exists for 
the DOS procedure library, except for copying procedures from the 
procedure library (via the PSERV command) or displaying the procedure 
library (via the DSERV command) . 

CMS/DOS does not support the standard label cylinder. 



INITIALIZING DOS AND PROCESSING DOS SYSTEM CONTROL COMMANDS 

Initialization of the CMS/DOS operating environment requires the setting 
of flags and the creation of certain data areas in storage. Once 
initialized, these flags and data areas may then be changed by routines 
invoked by the system control commands. 

Five modules are described in this section: 

• DMSSET Activates the CMS/DOS environment control blocks to be used 

during CMS/DOS processing. 

• DMSOPT Sets or resets compiler execution-time options. 

• DMSASN Relates logical units to physical units. 

• DMSLLD Lists the assignments of CMS/DOS physical units. 

• DMSDLB Associates a DTF with a logical unit for CMS/DOS processing. 
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DMSSET — Initializing the C MS-DOS Operating Environment 

DMSSET initializes the CMS/DOS operating environment as follows: 

• Verifies that the mode, if specified, is for a DOS formatted disk. 

• Stores appropriate data in the SYSRES LUB and PUB. 

• Locates and loads the CMS/DOS discontiguous shared segment. Saves 

(in NDCON) the addresses of the two major CHS/DOS data blocks, 
SYSCOM, BGCOM, and the address of the CMS/DCS discontiguous shared 
segment (CMSDOS) . 

• Sets the DOSMODE and DOSSVC bits in DOSFLAGS in NUCON. 

• Assigns (via ASSGN) the SYSLOG logical unit as the CMS virtual 
console. 

The CMS/DOS operating environment is entered when the CHS SET DOS CH 

CGliuaiiU IS iSsiitu, iiivOkiiiy Llic lOuule D5S5ET. 



Data Areas Prepared for Processing during CMS/DOS Initialization 

Several data areas are prepared for processing during initialization. 
The main CMS data area, NDCON, is modified to contain the addresses of 
two DOS data areas, SYSCOM and BGCOM. 

The SYSCOM DSECT is the DOS system communications region. It 
consists mainly of address constants, including the addresses of the AB 
option table, the POB ownership table, and the FETCH table. It also 
includes such information as the number of partitions (always one for 
CMS/DOS) and the length of the POB table. 

The BGCOM DSECT is the partition communication region. It includes 
such information as the date, the location of the end of supervisor 
storage, the end address of the last phase loaded, the end address of 
the longest phase loaded, bytes used to set the language translator and 
supervisor options, and the addresses of many other DOS data areas such 
as the LOB, POB, NICL, FICL, PIB, PIB2TAB, and the PCTAB. 

The LUB and PUB tables are also made available during initialization. 
The LUB is the logical unit block table. It acts as an interface 
between the user's program and the CMS/DOS physical units. It contains 
an entry for each symbolic device available in the system. 

Each of the symbolic names in the LUB is mapped into an element in 
the PUB, the physical unit block table. The PUB table contains an entry 
for each channel and device address for all devices physically available 
to the system and also contains such information as device type cede, 
CMS disk mode, tape mode setting, and 7-track indicator. 

Two bits are set in DOSFLAGS in NUCON, DOSMODE and DOSSVC. DOSMODE 
specifies that this virtual machine is running in the CMS/DOS operating 
environment. DOSSVC indicates whether OS or DOS SVCs are operative in 
the operating environment. If DOSSVC is set, DOS SVCs are used; 
otherwise, OS SVCs are operative. 
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SETTING OR RESETTING SYSTEM ENVIRONMENT OPTIONS 

Once the CMS/DOS environment is initialized, the flags and control 
blocks set during initialization can be modified and manipulated to 
perform the functions specified by commands entered at the console. 
This section describes the modules that set and reset the system 
environment options. That is, they set those options that control 
compiler execution and that control the configuration of logical and 
physical units in the system. 



EMSOPT- — Setting and Resetting Compiler Options 

The CMS/DOS OPTION command invokes module DMSOPT, which sets either the 
default options for the compiler or the options specified on the command 
line. The nonstandard language translator options switch and the job 
duration indicator byte are altered, options are set using two control 
words located in the partition communication region (BGCOM) . Bits in 
bytes JCSS3 or JCSW4 are set, depending on the options specified. 



DMSASN — As sociate System or Programmer Logical Units with Physical Units 

Module DMSASN is invoked when the ASSGN command is entered. DMSASN 
first scans the command line to ensure that the logical unit being 
assigned is valid for the physical unit specified (for example, SISLCG 
must be assigned to either the virtual console or the virtual printer) . 
Once the coomand line is checked, PUB and LUB entries are modified to 
reflect the specified assignment. 

For the PUB entry, the device type is determined (via DIAG 24) and 
the device type code is placed in the PUB. Other modifications are made 
to the PUB depending on the specified assignment. The LUB entry is then 
mapped to its corresponding PUB. 



DHSLLU — List the Assignments of CMS/DOS Logical Units 

The function of DMSLLU is to reguest a list of the physical units 
assigned to logical units. It performs this function by referencing 
information located in the CMS/DOS data blocks, specifically SISCOB, 
LUB, and PUB. Another data block, the next in class (NICL) table is 
also referenced. 

The information on the command line is scanned and the appropriate 
items are displayed at the user's console. If an option (EXEC or 
APPEND) is specified, an EXEC file is created ($LISTIO EXEC A1) to 
contain the output. If EXEC is specified, any existing SLISTIO EXEC A1 
file is erased and a new one is created. If APPEND is specified, the 
new file is appended to the existing file. 
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EMSDLB — Associate a DTF Table Filename with a Locfical On it 

DMSDLB is invoked when the CMS/DOS DLBL command is entered. DMSDLB 
associates a DTF (Define The File) table filename with a logical unit. 
This function is performed by creating a control block called a DOSCE, 
which contains information defining a DOS file used during job 
execution- DLBL is valid only for sequential or VSAM disk devices. 

This information parallels the label information written on a real 
DOS SYSRES unit under DOS/VS. The DOSCB contains such information as 
the name, type, and mode of the referenced dataset, its device type 
code, its logical unit specification, and its dataset type (SAM or 
VSAM) . 

A DOSCB is created for each file specified by the user during a 
terminal session. The DOSCBs are chained to each other and are anchored 
in NOCON at the field DOSFIRST. The chain remains intact for the entire 
session, unless an abend occurs or the user specifically clears an entry 
in the the DOSCB chain. A given DOSCB is accessed when an OPEN macro is 
issued from an executing user program. 

The overall logic flow for DMSDLB is as follows: 

1. Scans the command line to ensure that any options entered are valid 

(that is, anything to the right of the open parenthesis) . 

2. Processes the first operand (ddname or *) . When ddname is 
specified, loop through the DOSCB chain to find a matching ddname. 
If none is found, DMSDLB calls DMSFRE to get storage to create a 
new DOSCB for this file. The old copy of the DOSCB is then saved 
so that, in case of errors during processing, it can be retrieved 
intact. The new copy of the DOSCB contains updates and DOSCB 
replaces the old copy if there are no errors. 

3. The mode specification is checked to ensure that it is a valid mode 
letter; if the file is a CMS file, the mode letter must specify a 
CMS disk. If DSN has been specified, the mode letter must be for a 
non-CMS disk. 

4. Process each option on the command line appropriately. 

5. If EXTENT or MOLT is specified, a separate tlock of free storage is 
obtained to contain information about the extent, for example, a 
block is obtained to contain the DOS data set name. 

5. Check for errors. If there are errors, any blocks created during 
processing are purged and an error message is issued. If there are 
no errors, restore the old block, which has been modified to 
reflect current processing, and return control to DM5ITS. 

PROCESS CMS/DOS OPEN AND CLOSE FUNCTIONS 

The CMS/DOS OPEN routines are invoked in response to DOS OPEN macros. 
They operate on DTF (define the file) tables and ACE (access method 
control block) tables created when the DTFxx and ACB macros are issued 
from an executing user program. These tables contain information such as 
the LOG unit specification for the file, the DTF type of the file, the 
device code for the file, and so forth. The information in the tables 
varies depending upon the type of DTF specified (that is, the table 
generated by a unit record DTF macro is slightly different from the 
table generated by a DTF disk macro) . 
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Five routines are invoked to perform OPEN functions, DHSOPL, DHS0R1, 
DMS0R2, DHS0R3, and DMSBOP. DMSCLS performs the CLOSE function. 



Q£®SlJ33 Hiss A ss ociated With DTF Tables 

Depending on the type of OPEN macro issued frost a user program, one of 
five CMS/DOS OPEN routines could be invoked. OPENR macros give control 
to DMSOR1 and, depending on the DTF type specified, DMS0R2 or DMS0R3 may 
be invoked. These three routines (DMS0R1,DMS0R2, and DMS0R3) request 
the relocation of a specified file. DMSOPL is invoked by the DOS/VS 
compilers when they need access to a source statement library. These 
routines are mainly interface routines to DMSBOP, which performs the 
main function of opening the specified file. Each of the routines calls 
DMSBOP. 

DMSBOP is the CMS/DOS routine that simulates the DOS/VS OPEN 
function. The basic function of DMSBOP is the initialization of DTF 
tables (that is, setting fields in specified DTFs for use by the DOS/VS 
LIOCS routines) . 

When a DOS problem program is compiling, a list of DTFs and ACBs is 
built. At execution time, this list is passed to DMSBOP. The logic 
flow of DMSBOP is as follows: 

1. Scans the list of DTF and ACB addresses, handling each iteam in the 
list in line. When the OPEN macro expands, register 1 points to 
the naie of the $$B transient to receive control ($$BOPEN) and 
register points to the list of DTF/ACB addresses to be opened. 

2. When an ACB is encountered in the table, control is passed directly 
to the VSAM OPEN routine, $$BOVSAM. The VSAH routine is 
responsible for opening the file and returning control to DMSBOP. 

3- When a DTF is encountered in the table, DMSBOP itself handles the 
OPEN: 

a. For reader/punch files (DTFCD) , the OPEN bit in the DTF table 
is turned on. 

b. For printer files (DTFPR) , if two IOAREAs are specified, the 
IOREG is loaded with the address of the appropriate IOAREA. 
Next, the POB index byte associated with the logical unit 
specified in the DTF is checked to ensure that a physical 
device has been assigned and the PUB device code is then 
analyzed. The OPEN bit in the DTF table is then turned on. 

c. For console files (DTFCN) , no OPEN logic is required. 

d. For tape files (DTFMT) , the POB device type code must specify 
TAPE. If an IOREG is specified (for output tapes only) , the 
address of the appropriate IOAREA is placed in it. For input 
files, there is separate processing for tapes with standard 
label, nonstandard label, and no label. For output tapes, both 
tape data files and work tape files are treated as no label 
tapes. 
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e. For disk files (DTFxx) , the LUB is verified to ensure that the 
logical unit has been assigned. A check is made to ensure that 
the DOSCB exists for the DTF filename. For disk output files, 
the address of the appropriate IOAREA is placed in IOSEG. For 
disk input files, the existence of the file is verified via a 
call to DMSSST. Also, EXTENT information is initialized and 
the OPEN bit is posted. 

f. DTFDT and DTFCP are separate DTF types that could describe any 
of the above devices. 

4. After all files in the table have been opened, DMSBOP returns 
control to the problem program via SVC 11. 

5. If errors are encountered during DMSBOP processing, an error 
message is issued and return is made via SVC 6. 



Closing Files Associated With DTFs 

The CMS/DOS routine that processes CLOSE requests is DMSCLS, whose logic 
is analogous to that of DMSBOP, the OPEN routine described above: when 
CLOSE expands, register 1 points to $BCLOSE and register points to the 
list of DTF/ACB addresses. The same table containing DTFs and ACBs used 
to open files is also used to close those files. Each entry in the 
table is processed as it occurs, with control passing to a VSAM CLOSE 
routine ($$BCVSAM) when an ACB is encountered. The OPEN bit is then 
turned off. 



PROCESS CMS/DOS EXECUTION-RELATED CONTROL COMHANES 

The CMS/DOS FETCH and DOSLKED commands simulate the operation of the 
EOS/VS fetch routines and the DOS/VS Linkage Editor. The three CHS 
modules that perform this simulation are: 

• DMSFET — Provide an interface to interpret the DOS FETCH command line 
and execute the phase, if START is specified on the command line. 

• DMSFCH — Bring into storage a specified phase from a system or private 
core- image library or from a CMS DOSLIB library. 

• DMSDLK — Link edit the relocatable output of the CMS/DOS language 
translators to create executable programs. 



DMSFET and DMSFCH — Bring a Phase into Storage for Execution 

The DOS/VS FETCH function is simulated by CMS modules DHSFET and DMSFCH. 
The main control block used during a FETCH operation is FCHSECT, which 
contains addressing information required for I/O operations. 

The FETCH command line invokes module DMSFET. This module first 
validates the command line and issues a FILEDEF for the DOSLIB file. It 
then issues a FILEDEF for a DOSLIB file. DMSFET then issues a DOS SVC 
4, which invokes the module DMSFCH to perform the actual FETCH 
operation. 
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DMSFCH first determines where the phase to be fetched resides. The 
search order is private core-image library, DOSLIB, system core-image 
library. If the "phase is not found in any of these libraries, DMSFCH 
assumes that the FETCH is for a phase in a system or private core-image 
library. To find a DOSLIB library member, OS OPEN and FIND macros are 
issued (SVC 19 and 18) . 

When the member is found, OS READ and CHECK macros are issued to read 
the first record of the file (the member directory) . This record 
contains the number of text blocks and the length of the member. 

All addressing information is stored in FCHSECT and the text blocks 
that the phase are read into storage. If the read is from a CMS disk, 
issue the OS READ and CHECK macros to read the data. If the read is 
from a DOS disk, first determine whether this is the first read for the 
DOS discontiguous shared segment (DCSS) . If this is the case, CCW 
information is relocated to ensure that the DCSS code is reentrant. For 
all reads for a DOS disk, a CP READ DIAG instruction is issued. When 
the entire file is read, it is relocated (if it is relocatable) . 

If a DOSLIB is open, close it using an OS SVC 20 and return control 
to DMSFET. DMSFET then checks to see whether START is specified and, if 
so, an SVC 202 is issued for the CMS START command to execute the loaded 
file. 

When all FETCH processing is complete, control returns to the CMS 
command handler, DMSITS. 

S inula te the Functions of the DOS/VS Linkage Editor: DMSDLK 

CMS simulation of the DOS/VS Linkage Editor function directly parallels 
the DOS/VS implementation of that function. For detailed information on 
the logic cf the function, see the publication DOS/VS Linkage Editor 
LogjLc, Order No. SY33-8556. 

Note that the modules comprising the DOS/VS Linkage Editor are 
prefixed by the letters IJB and are separate CSECTs. ALL of these 
CSECTs have counterparts contained within the one CMS module, DMSDLK. 
They are treated as subroutines within that module, but perform the same 
functions as their independent DOS/VS counterparts and have been named 
using the same naming conventions as for the DOS/VS CSECTs. For 
example, the IJBESD CSECT in DOS/VS is paralleled by the CMS DMSDLK 
subroutine DLKESD. 

A brief dscription of the logic follows. The CMS/DOS DOSLKED command 
invokes the module DMSDLK, which is entered at subroutine DLKISL. 
DLKINL performs initialization and is later overlaid by the text buffer 
and the linkage editor tables. DLKINL starts to read from a DOSLNK file 
and processes ACTION statements, if there are any. 

On encountering the first non-ACTION card (or if there is no DOSLNK 
file), the main flow is entered. Depending on the input on the DOSLHK 
or the TEXT file, records from either of those files may be read or 
records from a relocatable library may be read. The type of card image 
read determines the subroutine to which control is given for further 
processing. 

An ENTRY card indicates the end of the input to the linkage editor. 
At this point, a map is produced by subroutine DLKMAP. DLKRLD is then 
entered to finish the editing of object modules by relocating the 
address constants. If the phases are to be relocatable, relocation 
information is added to the output on the DOSLIB. Updating of the 
DOSLIB library is performed by DLKCAT using the OS STOW macro. 

CMS Method of Operation and Program Organization 2-143 



A significant deviation from DOS/VS code is the use of OS macros, in 
sone instances, rather than DOS/VS macros. To take advantage of CMS 
support of partitioned data sets, the OS OPEN, FIND, BEAD, CHECK, and 
CLOSE macros are issued rather then their DOS/VS counterparts. 



SIMULATE DOS SVC FUNCTIONS 

All SVC functions supported for CMS/DOS are handled by the CMS module 
DMSDOS. DMSDOS receives control from DMSITS (the CMS SVC handler) when 
that routine intercepts a DOS SVC code and finds that the DOSSVC flag in 
DOSFLAGS is set in NUCON. 

DMSDOS acquires the specified SVC code from the OLDPSW field of the 
current SVC save area. Using this code, DMSDOS computes the address of 
the routine where the SVC is to be handled. 

Many CMS/DOS routines (including DMSDOS) are contained in a 
discontiguous shared segment (DCSS) . Most SVC cedes are executed within 
DMSDOS, but some are in separate modules external to DMSDOS. If the SVC 
code requested is external to DMSDOS, its address is computed using a 
table called DCSSTAB; if the code requested is executed within DMSDOS, 
the table SVCTAB is used to compute the address of the code to handle 
the SVC. 

The items below show the SVCs supported by CMS/DCS simulation 
routines, the name of the macro that invokes a given SVC code, the CBS 
module that executes the code, and a brief statement describing how the 
SVC function is performed. 

SVC 0: EXCP — Handled by module DMSXCP reads from CMS or DOS/VS 

formatted disks. CCWs are converted to appropriate CMS I/O requests, 
for example, RDBUF/WRBUF, CARDRD/CARDPH. The CCE is posted (indicating 
I/O completion) using CMS return information. If a non-zero return code 
is returned, a CANCEL is performed. I/O requests to DOS disks are 
handled using CP DIAGNOSE instructions. 

SVC J: F ETC H — Handled by DMSFCH. . .loads a problem program phase into 
core and executes it, if execution is requested. For details on how 
FETCH works, see the section "Bring a Phase into Storage for Execution: 
DMSFET and DMSFCH." 

§Z£ 2: FETCH — Handled by DMSFCH. . .loads a $$$$B-Transient phase into 
core and executes it, if execution is requested. For details on how 
FETCH works, see the section "Bring a Phase into Storage for Execution: 
DMSFET and DMSFCH." 

SVC 4: F ETC H — Handled by DMSFCH. . .loads a problem program phase into 
user storage and executes it, if execution is requested. For details on 
how FETCH works, see the section "Bring a Phase into Storage for 
Execution: DMSFET and DMSFCH." 

SVC 5: MVCOM — Handled by DMSDOS. . .provides the user with a way of 
altering bytes 12 through 23 of the partition communication region 
(BGCOM) . Checks to ensure that the specified field is correct length 
and then moves the information to the specified field. 

§IC 6: CANCL — Handled by DMSDOS. . .cancels a CMS/DOS session. 
Processing depends on value in register 15 on entry; if above 256 the 
request is from a system program. If below 256, request is from a user 
program. Processing continues with control passing to EOJ code, 
described below. 
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SVC 7: WAIT — Handled by DMSDOS. . .informs system programs to wait for a 
system event to take place before processing can continue. WAIT is an 
effective NOP for CMS/DOS. 

SYC 8: Handled by DMSDOS. . .temporarily returns control to a problem 
program. The address of the problem to which control is being passed is 
contained in register 0. This address is stored in the SVC save area 
OLDPSW field and control is passed to the CHS SVC handler (DHSITS) . 

SVC 9: Handled by DMSDOS. . .returns control to system program (i.e. a 
user program has been given control, as in the case of SVC 8, and must 
return control to the system routine, a $$$$B-Transient routine, that 
called it) . 

SVC H: Handled by DMSDOS. . .returns control to a problem program from a 
$S$$-B transient routine. Uses the SVC save area OLDPSW field to return 
to the calling program. 

SVC 12: Handled by DMSDOS resets flags in the linkage control byte of 

the Partition Communication Region (BGCOM) to zero; also, provides the 
user the capability to use a mask to set the value of this same byte. 
In both cases, the SVC routine that handles the request performs an AHD 
operation to accomplish the function. 

SVC 14: EOJ — Handled by DMSDOS normally terminates execution of a 

problem program. Clears control blocks and resets control words. 

SVC 1_6: Handled by DMSDOS.. .establishes linkage with or terminates 
linkage to a user's program check routine. Locates the appropriate PC 
option table entry. If contents of register is zero, terminates 
linkage: stores a zero into the routine address field of the PC option 
table. If register is non-zero, the address of the PC routine and the 
save area address is passed to the STXIT macro. If a STXIT PC routine 
is already active, the complement of the new routine address is placed 
in the PC option table; if no STXIT PC routine is active, both the new 
routine address and the save area address are placed in the PC option 
table. 

SVC 17: Handled by DMSDOS. . .provides supervisory support for the EXIT 
macro. Locates appropriate PC option table entry and restores user's 
registers and PSW. Stores the address of the PC routine in the PC 
option table and returns to the next sequential address in the 
interrupted program. 

SVC 26: Handled by DMSDOS. .. validates address limits. Checks the limits 
passed in registers 1 and 2 and either returns control to the caller or 
writes an error message. 

SIC 33: COMBG — Handled by DMSDOS provides the address of the 

partition communication region (BGCOM) - Returns the address of BGCOM in 
register 1. 

SVC 34: Handled by DMSDOS supports the GETIME macro. Updates the date 

field in the partition communications region (BGCOM) . 

SVC 37: Handled by DMSDOS. . .establishes linkage to or terminates linkage 
from a user's abnormal termination routine. Locate the AB table entry. 
If register contains zeros, terminates linkage: if the AB routine is 
active, stores zeros into the routine address field of the AB option 
table. If the AB routine is net active, stores zeros into both the 
routine address field and the save area field of the AB option table. 

If register is non-zero, establishes linkage: passes the address of 
the AB routine and the save area address to the STXIT AB macro. If 
STXIT AB is active, the complement of the AB routine address is stored 
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in the AB option table. If STXIT AB is not active, both the address of 
the new AB routine and the address of the save area are placed in the 
option table. 

SVC 40: POST — Handled by DMSDOS signals the completion of a system 

event. 

SVC 50 : Handled by DMSDOS. . .issues an error message and terminates the 
command. Issued by a LIOCS routine when that routine is reguested to 
perform a function it could not perform. 

SVC 61: GETVIS — Handled by DMSDOS. . .used by VSAM to obtain scratch 
storage; also, obtains storage for a relocatable VSAM routine. Storage 
is obtained from the user. free storage area and the address of the 
storage is returned in Register 1. 

SVC 62: FREEVIS — Handled by DMSDOS. . .returns storage obtained by a 
GETVIS. Address of the area to be returned is pointed to by Register 1. 

?ll£. tl' !I§E — Handled by DMSDOS VSfcW uses SVC 63 to ensure that 

system resources are updated serially, so that two or more attempts to 
modify the same data at the same time do not succeed. A table of 
counters (RORTBL) is kept for system resources. These counters are 
posted when a reguest is made for system resources. If a resource is 
already in ase, a return code of eight is placed in register 0. If the 
resource is available, a zero is returned in Register 0. 

SVC 64: SEiiliSE — Handled by DMSDOS. . .VSAM uses SVC 64 to release a 
system resource obtained via USE SVC. The appropriate counter in RDRTEL 
is decremented by one each time a resource is released. 

SVC 65: CDLOAD — Handled by DMSDOS- ..loads a relocatable VSAM phase 
into storage unless that phase has already been loaded. 

If an anchor table is available, it is searched for the phase. If 
the phase is found, its load point, entry point, and length are returned 
in registers 0, 1, and 14, respectively, and register 15 contains zeros. 

If the phase is not found in the anchor table, DHSFCH is called to 
search for it. If the phase is found in the discontiguous shared 
segment, return is made to the reguestor as above. 

If the phase was found, but not loaded, storage is obtained for it 
via the GETVIS SVC. DMSFCH is called again to load the phase into the 
storage just obtained. An anchor table is then built in the user area 
(unless one already exists) and return to the caller is then made as 
described above. 

SVC 66: RUNMODE — Handled by DMSDOS. . .determines whether the problem 
program is running in real or virtual mode. Register contains zero on 
return if the program is running in virtual mode. 

SVC 25: SECTVAL — Handled by DMSDOS. . .used by VSAM I/O routines to 
obtain a sector number for 3330 or 3340 devices. The appropriate sector 
value is calculated from input supplied in registers 1 and 0. The 
sector number (from to 127) is returned in register 0. 

Certain DOS SVCs are treated as no-ops by CMS/DOS and other DOS/VS 
SVCs are not supported. These are listed below. 

SVC 95: Handled by DMSDOS provides supervisory support for the EXIT 

macro. The AB option of the EXIT macro provides an exit from the 
abnormal task termination routine and continues the task. 
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The linkage to either the PC or AB routine is reestablished, and the 

cancel condition is reset by clearing the abnormal end indication in the 

partition PIB extension. Control is returned to the instruction 
following the EXIT AB macro. 



SVCS TREATED AS NO-OP BY CMS/DOS 



SVC 

10 

18 

20 

22 

24 

35 

36 

41 

42 

52 

67 

68 

71 

85 

86 

87 



Action 

Sets timer interval 

STXIT (IT) 

Establishes linkage to OC 

Seizes (interruption enable/disable) 

Sets timer interval 

Holds a track 

Frees a track 

Dequeues a resource 

Enqueues a resource 

seconds returned as remaining timer interval in register 

PFIX, fixes pages in real storage 

PFREE, frees pages in real storage 

SETPFA 

RELPAG 

FCEPGOUT 

PAGEIN 



SYCS HOT SUPPORTED BY CMS/DOS: The following SVCs cause an error message 
to be generated and are treated as a CANCL (SVC 6) . 



SVC 

3 
13 
15 
19 
21 
23 
25 
27 
28 
29 
30 
31 
32 
38 
39 
43 
44 
45 
46 
47 
48 
49 
51 
53 
54 
55 
56 
57 
58 
59 
60 
69 
70 



Action 

Forces dequeue 

Sets switches in BGCOM 

Heads queue and executes channel program 

Returns from user's IT 

EXIT (OC) 

Loads phase header 

Issues HIO 

Special HIO 

Returns from user's MR 

Multiple WAITM support 

Waits for a QTAM element 

Posts a QTAM element 

Reserved for IBM use 

Initializes a subtask 

Terminates a subtask 

Reserved for IBM use 

External unit checks record 

Emulator interface 

OLTEP in supervisor state 

Multiple WAITF support 

Fetches a CRT trans 

Reserved by IBM 

Returns phase header 

Reserved by IBM 

Frees real page frames 

Gets real page frames 

Gets or frees PDB of POWER device 

Makes POWER dispatchable 

Interface between JCL and supervisor 

Interface between EOJ and supervisor 

EREP and CRT I/O areas address 

REALAD 

VIRTAD 
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72: GETCBUF/FREECBOF 

73: SETAPP 

74: Fixes pages in real storage for restart 

76: Initializes for recording of RMSR I/O error 

77: TRANSCSH 

78: Reserved for IBM use 

79: Reserved for IBM use 

80: Reserved for IBM use 

81: Reserved for IBM use 

82: Reserved for IBM use 

83: Reserved for IBM use 

84: Reserved for IBM use 

88 and up: 

Reserved for IBM use 



PROCESS CMS/DOS SERVICE COMMANDS 

DMSSRV — Copies books from a system or private source statement library 
to a specified output device. 

DMSPRV — Copies DOS procedures from a DOS system procedure library to a 
specified output device. 

DMSRRV — Copies modules from a system or private relocatable library to a 
specified output device. 

EMSDSV — Lists the directories of DOS private or system libraries. 

DMSDSL — Deletes members (phases) of a DOSLIB library; compresses a 
DOSLIB library; lists the members (phases) of a DOSLIB library. 

ESERV — De-edits, displays or punches, verifies, and updates edit 
assembler macros from the source statement library. 



TERMINATE PROCESSING THE CMS/DOS ENVIRONMENT 

DMSBAB — Gives control to an abnormal termination routine once linkage to 
such a routine has been established via the STXIT AB macro. 

DMSITP — Processes program interrupts and SPIE exits. 

DMSDMP — Simulates the $$BD0MP and $$BPD0MP routines; issues a CP DDHP 
coimand directing the dump to an offline printer. 
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Performing Miscellaneous CMS Functions 



The CHS Batch Facility and error printouts are described below. 



CMS BATCH FACILITY 

The CMS Batch Facility is a function of CMS. It provides a way of 
entering individual user jobs through an active CHS machine from the 
virtual card reader rather than from the console. The batch facility 
reissues the IPL command after each job. 

The CMS Batch Facility consists of two modules: DMSBTB, the bootstrap 
routine (a ncnrelocatable CMS module file) and DHSBTP, the processor 
routine (a relocatable CHS text file that runs free storage) . 



General Operation of DHSBTB 

The bootstrap module, DHSBTB, loads the processor routine DMSBTP and the 
user exit routines BATEXIT1 and BATEXIT2 (if they exist) into free 
storage. 

DHSBTB first ensures that DHSINS (CMS initialization) has set the 
BATRDN and BATLOAD flags on in the CMS nucleus constant area indicating 
that either an explicit batch initial program load command has been 
issued or that the CHSBATCH command has been issued immediately after 
initial program load has taken place. If not, error message DMSBTB101E 
is typed and the batch console returns to a normal CHS interactive 
environment. STATE (DHSSTT) is then called to confirm the existence of 
the processor file DHSBTP TEXT. If the file does not exist, error 
message DHSTBT100E is typed and the batch console returns to the CHS 
interactive environment. 

Using the "state" copy of the file status table (FST) for DMSBTP, 
DHSBTB computes the size of DHSBTP TEXT file by multiplying the logical 
record length by the number of logical records (no DS constants) . A 
free storage request is made for the size of DHSBTP and the address of 
the routine is then stored at ABATPROC in the NOCON area of the CMS 
nucleus. 

The existence of the user exit routines is determined by STATE. If 
they exist, their sizes are included in the request for free storage. 

The free storage address is translated into graphic hexadecimal 
format and the CHS LOAD command is issued to load the DHSBTP TEXT file 
into the reserved free storage area. The user exit routines, BATEXIT1 
TEXT and BATEXIT2 TEXT are also loaded at this time. If these files do 
not exist, an unresolved external reference error code is returned by 
the loader, but is ignored by DMSBTB because these routines are 
optional. If an error (other than unresolved names) occurs, error 
message DHSBTB101E is typed and the batch console returns to the CHS 
interactive environment. 

The loader tables are searched for the address of the ABEHD entry 
point DHSBTPAB in the loaded batch processor. Uhen the entry is found, 
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its address and that of entry DHSBTPLM are stored in ABATABND and the 
ABATLIHT respectively, in the HUCON area of the CHS nucleus. If the 
ABEHD entry point is not found in the tables, error message DHSBTB101E 
is typed and the batch console returns to the CMS interactive 
environment. 

The BATLOAD flag is set off to show that DHSBTP has been loaded, the 
BATHOEX flag is set on to prevent user job execution until DHSBTP 
encounters a /JOB card and finally, control is returned to the command 
processor DHSINT. 

If an error message is issued, DMSERR is called to type the message, 
and the BATRUN and BATLOAD flags are set off before control is returned 
to CHS. This allows the normal CHS interaction to resume. 



General operation of DHSBTP 

The batch processor Module DMSBTP simulates tne function of the CHS 
console read module DHSCRD. This is accomplished by issuing reads to 
the virtual card reader, formatting the card-image record to resemble a 
console record and returning control to CHS to process the command (or 
data) request. DHSBTP also performs reads to the console stack if the 
stack is not empty, checks for and processes the /JOB card, ensuring 
that it is the first record in the user job, traps all CP commands to 
maintain system integrity and performs job initialization, cleanup, and 
job recovery. 

Upon receiving control, DHSBTP checks the BATCPEX flag in NOCOH. If 
the flag is set on, control was received from DMSCPF and a branch is 
made to the CP trap routine to verify that the command is allowable 
under batch. The function of that routine is described later. If the 
BATCPEX flag is off, control was received from DHSCHD (console read 
module) and DHSBTP checks for finished reads in the real batch console 
stack. If the number of finished reads is not zero, control is returned 
to DHSCRD to process the real console finished (stacked) reads. If the 
number of finished reads is zero, a record is read from the batch 
virtual card reader into the CARD buffer via an SVC call to CARDRD 
(EMSCI0) . The record in the CARD buffer is typed on the console via the 
WRTERH macro. If the BATHOVE flag is set on (MOVEFILE executing from 
the console) , the records in the file are not typed on the console. 

The record in the reader buffer is scanned to compute its length with 
trailing blanks deleted. It is then moved to the CHS console read 
buffer and the computed length is stored in the original DHSCRD 
parameter list, whose address is passed by DHSCRD when it initially 
passes control to DHSBTP. 

If the first user record is not a /JOB card, error message DHSBTP105E 
is typed and normal cleanup is performed with the BATTERH flag set on. 
This flag prevents another initial program load, since it is not needed 
at this time. Reads to the card reader are then issued until the next 
/JOB card is found. 

If the first record is a /JOB card, DMSBTP branches to its /JOB card 
processing routine which calls DHSSCHN via a EALR. A check is made fcr 
the existence of the userid and account number on the card. If the 
fields exist, a CP DIAGNOSE X'^IC 1 is issued to start accounting 
recording for that userid and account number. If an error is returned 
from CP denoting an invalid userid, or if the userid or account number 
fields were missing on the /JOB card, error message DHSBTP106E is typed 
and normal cleanup is performed with the BATTERH flag set on. 
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The jobname, if provided on the /JOB card, is saved and a message is 
issued via SVC to inform the source userid that the job has started. 
The spooling devices are closed and respooled for continuous output, a 
CP QUERY FILES comaand is issued for information purposes and the 
implied CP function under CMS is disabled and the protection feature set 
off via SVC calls to SET (DMSSET) . The BATPROF EXEC is executed via an 
SVC to EXEC. The BATNOEX flag, which is set by DMSBTB to suppress user 
job execution until the /JOB card is detected, is set off. The BATUSEX 
flag is set on (for DMSCPF) to signal the start of the actual user job, 
and a branch is take'n to read the next card from the reader file (user 
job). 

After reading the /JOB card, DMSBTP continues reading and checks for 
a /* card, a /SET card, or a CP command. If a card is none of these, 
DMSBTP passes control back to the command processor DHSINT for 
processing of the command (or data) . 

If a /* card is read and it is the first card of the new job, it is 
assume to be a precautionary measure and thus ignored by DMSBTP which 
then reads the next card. If it is not the first card a check is made 
for the BATMOVE flag. If the flag is on, the /* card indicates an 
end-of-file condition for the MOVEFILE operation from the console 
(reader) and is consequently translated to a null line for the MOVEFILE 
command. 
\ 

If the BATMOVE flag is not on, the /* card is and end-of-job 
indicator and an immediate branch is taken to the end-of-job routine for 
cleanup and reloading of CMS batch. 

When a CP command is encoutered DMSBTP branches to a routine that 
first checks a table of CP commands allowable in batch. If the command 
is allowed, a check is made for a reader or other spool device in the 
command line. If the CP command is allowed but would alter the status 
of the batch reader or any spooling device or certain disks, or if the 
command is not allowed at all, error message BMSBTP107E is typed, and 
the next card is read. 

If the CP command is LINK, the device address is stored in a table so 
that DMSBTP can detach all user disk devices at the end of the job. 

A CP DETACH coaaand is examined for a device address corresponding to 
the system disk, the IPL disk, the batch 195 work disk or any spool 
device. If the device to be detached is any of these, error message 
DMSBTP107E is displayed and the next card is read. Otherwise, DMSBTP 
returns control to DMSINT (or DMSCPF is the BATCPEX flag is set on) for 
processing cf the command. 

When a /SET control card is encountered, the card is checked for 
valid keywords, valid integer values (less than or equal to the 
installation default values) , and if an error is detected, error message 
DMSBTP108E is typed. An abnormal termination aessage is also sent to 
the source userid and the job is terminated with normal cleanup 
performed. If the control card values are valid, the appropriate fields 
are updated in the user job limit table DMSBTPLM and the next card is 
read. 

If DMSBTP detects a "not ready" condition at the reader, a message is 
typed at the console stating that batch is waiting for reader input. 
DMSBTP then issues the WAITD macro to wait for a reader interrupt. When 
first detecting the empty reader, DMSBTP calls the CP accounting 
routines via a CP diagnose * 4C 1 to charge the wait time to the batch 
userid. 
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If a hard error is detected at the reader, DMSBTP sends an 
"intervention required" message to the system console and branches to 
its abnormal terminal routine and waits for an interruption for the 
reader by issuing the HAITD macro. 



ffhe 
end-of 
cleanu 
job e 
terrain 
end of 
consol 
consol 
comman 



n a /* 
-file 
p routi 
nded no 
ation) 

the u 
e I/O 
e) , and 
d are r 



card is 
condition 
ne which s 
rmally or 
and turns 
ser job. 
to finish, 
all disks 
eturned by 



read (with the 
occurs at the 
ends the source 
abnormally (if 
Off the BATDSEX 
CONWAIT (DMSCWT) 
the spooling d 
that were made 
issuing the CP 



BATMOVE flag off) or when the 

reader, DMSBTP branches to the 

userid a message stating that the 

cleaning up after an abnormal 

flag (for DMSCPF) to signal the 

is called via SVC to allow any 

evices are closed (including the 

available by issuing the CP LINK 

DETACH command. 



DMSBTP then relinquishes control by issuing the CP IPL command with 
the PARM BATCH option which loads a new CMS nucleus and the next job is 
started when CMS attempts its first read to the console. 



A branch is made to the CMSBTP routine when DMSBTP 
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Bhen a CP command is called via an SVC in DMSBTP, the CMS CP module 
(DMSCPF) is actually called to issue the DIAGNOSE instruction to invoke 
the CP command. DMSBTP calls DMSCPF by issuing a direct SVC 202 or by 
issuing the LINEDIT macro with the CPCOMM option that generates an SVC 
203. 



Other CMS Modules Modified in CMS Batch 



Several CMS modules check whether CMS batch is running, and, if so, 
perform functions associated with batch operation. These are shown in 
the following list: 

Module Function Performed for CMS Batch 

DMSINI Passes batch parameters to DMSINS. 

DMSINS Uses batch IPL parameters to reload CMS Batch. 

BMSLDR Loads DMSBTP into free storage. 

DMSCRD Passes control to DMSBTP to read from the reader rather than 

from the console. 
DMSITE Accounts for virtual time used by batch job — ABEND if over 

limit. 
EMSPIO Accounts for number of lines printed by batch job — ABEND if 

over limit. 
DMSCIO Accounts for number of cards punched by batch job — ABEND if 

over limit. 
DMSABN Passes control to batch ABEND routine in DMSBTP. 
EMSERR Passes control to batch ABEND routine instead of entering 

disabled wait state. 
DMSMVE Turns the BATKOVE flag on and off — allows batch to treat 

moved blanks as data. 
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DMSSET Disabled if batch running, except during batch initialization 

DMSRDC Disabled if batch running. 

DMSCPF Distinguishes between CP command issued by user and by batch. 

DMSFLD Disallows reader device specification. 

DMSDSK Disk load not allowed in batch. 



ERROR PRINTOUTS 



VM/370 error recording records and records passed via the SVC 76 by 
virtual machines are accumulated in chronological order on the VM/370 
error recording cylinders. The following modules are used by CHS CPEREP 
to edit and print error records compiled by VM/370 as well as 
SYS1.LOGREC data sets: 

Hl.9.il]i.±.§ Function 

DMSIFC Checks some of the operands invoked by CPEREP for validity and 

passes the operands to IFCEREP1 for further processing. 
DMSREA Reads pages from the error recording cylinder and makes the 

records available to IFCPERSP1. 
IFCEREP1 Selects error records according to supplied CPEREP operands or 

default values, and formats the records for output. 

Detailed descriptions of the CPEREP command, the DMSIFC and DMSREA 
modules, and EREP (IFCEREP1) are found in the VM/370 CLTSEP and Error 
Recording Guide and the VM/370 Service Routines Program Logic with 
appropriate referrals to OS/VS Environmental Recording, Editing, and 
Printing {ERJP.} Program. 
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CMS Directories 



This section contains the following information: 

• Module Entry Point Directory 

• Hodule-to-Label Cross Reference 

• Label-to-Module Cross Reference 
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Module Entry Point Directory 



Module 
Name 



Entry 
Points 



DMSABN 



DMSACC 



DMSACF 



BMSACM 



DMSALO 



DMSAMS 



DMSARD 



DMSARE 



BMSARN 



DMSARX 

DMSASD 



DMSABN 



DMSABNKX 



DMSABNGO 



DMSABNSV 



DMSABNRT 



ACCESS 



READFST 



READHFD 



RELUFD 



DMSAMS 



DMSARD 



DMSARE 

DMSARN 
ASMHAND 

DMSARX 
DMSASD 



Function 



Intercepts an abnormal termination (ABEND) and provides 

recovery from the ABEND. Entered by a DMKABN 

TYPCALL=BALR macro call. 

Entered by a KXCHK macro tc halt execution after HX has 

been entered after signaling attention. 

Entered by any routine that sets up ABNPSW and AENREGS 

in the work area beforehand. 

Entered as the result of a DMSABN TYPCALL=S7C macro 

call. 

Returns entry point from EEBOG. 



Accesses data in the ADT and related information 
as AFT's and chain links) in virtual storage. 



(such 



Reads all file status table blocks into storage for a 
read/write disk. Reads in file management tables for a 
read - only disk. For an 0/S disk, control returns to 
to the caller after a successful return from DMSACM. 

Reads the ADT, QMSK, QQHSK, and first chain link into 
virtual storage from the master file directory en disk. 

For a specified disk, releases all tables kept in free 
storage and clears appropriate information in the 
active disk table (ADT) . 

Provides an interface tc DOS Access Method Utility 
programs (IDCAMS) . Provided for support of CHS/VSAM. 

Provides storage for the ASM3705 assembler auxiliary 
directory. DMSARD contains no executable code. It must 
be loaded with DMSARX and the GENDIRT command must then 
be issued to fill in the auxiliary directory entries. 
GENMOD must then be issued to create the ASSEMBLE 
module. 

Releases storage used for tables pertaining to a given 
disk when that disk is no longer needed. 

This is the ASM3705 command processor. It provides the 
interface between user and the 370x Assembler. 
This is the SYSUT2 processing routine called from 
DMSSOB and used during the assembly whenever any I/O 
activity pertains to the SYSDT2 file. 

Provide an interface for the ASM3705 command to the 
3705 assembler program. 

Provides storage for the assembler auxiliary directory. 
DMSASD contains no executable code. It must be loaded 
with DMSASM and the GENDIRT command lust then be issued 
to fill in the auxiliary directory entries. The GENMOD 
command must then be issued to create the assemble 
module. 
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Module Entry Point Directory 



Module 
Nane 



Entry 
Points 



Function 



DMSASM 



DMSASH 



DMSAUD 



DMSBAB 



DMSBOP 



DMSERD 



DMSBSC 



DMSBTB 



DMSBTP 



DMSBHR 



DMSCAT 



DMSCIO 



DMSASM 
ASMPROC 

DMSASN 

DMSADD 

DMSAUDDP 

DMSBAB 

DMSBOP 



DMSBRD 
(RDBDF) 

BASIC 



DMSBTB 

DMSBTP 
DMSBTPAB 

DMSBTPLM 

DMSBHR 

DMSCAT 



DMSCIOR 
DMSCIOP 
DMSCIOSI 



Processes the ASSEMBLE command. Provides the interface 
between the user and the system assembler. 
This is the SYSUT1 processing routine (called from 
DMSSOB) . 

Associates logical units with a physical hardware 
device. (Interface for the ASSGN command used by 
CMS/DOS and CMS/VSAM.) 

Reserves space on disk for writing a copy of disk and 
and file management tables on disk and then updates the 
master file directory. 

Closes all CMS files, thereby updating the master file 
Directory for any disks that had an output file open. 

Give control to an abnormal termination routine once 
linkage to such a routine has been established by 3TXIT 
AB macro. 

Opens CMS/DOS files associated with the following DTF 
(Define The File) tables: DTFCN, DTFCD, DTFPR, DTFMT, 
DTFDI, DTFCP, DTFSD. Once the files are opened and 
initialized, I/O operations can be performed using the 
file. 

Reads one or more successive items from a specified 
file. 

Processes the BASIC command. The BASIC command invokes 
the CALL-OS BASIC language processor to compile and 
execute the specified file of BASIC source code. 

This is the CMS batch bootstrap routine. It loads the 
batch processor routine (DMSBTP) and user exit routine 
(if they exist) into free storage. 

Main entry; reads from the virtual card reader each 

time CMS tries to execute a console read. 

Entry point for abnormal conditions during user job: 

• Job exectuion ABEND (from DMSABN) 

• Job limit exceeded (from DHSITE, DMSCIO, DMSPIO) 

• Disabled CMS command (from the command) 
Non-executable user job limit table referenced by 
DMSITE, DMSPIO, and DMSCIO. 

Writes one or more successive items into a specified 
disk file. 



Stacks a line of console input that DMSCRD reads 
when it is called. 



later 



Reads one card record. 
Punches one card record 
Punch callers buffer. 
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Entry 
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Module 
Name 



Function 



DMSCIT 



DMSCLS 



DMSCMP 
DMSCPF 
DMSCPY 
DMSCHD 

DMSCWR 
DMSCHT 

DMSDBD 

DMSDBG 

DMSDIO 

DMSDLB 



DMSDLK 



DMKDMP 



DMSDOS 



DMSCIT 



DMSCITA 
DMSCITB 
DMSCITDB 

DMSCLS 



COMPARE 
DMSCPF 
DMSCPY 
DMSCRD 

DM5CWR 

DMSCWT 

DMSDBD 



DMSDBG 
DMSDBGP 
DMSDBG 
DMSDIOR 

DMSDIOW 



DMSDLB 



DMSDLK 



DMKDMP 



DMSDOS 



Processes the interruptions for all CMS terminal I/O 
operations and starts the next I/O operation upon 
completion of the current I/O operation. 
Processes terminal interruptions. 
Starts next terminal I/O operation. 
Frees I/O buffers from stacks. 

Closes CMS/DOS files associated with the following DTF 
(Define The File) tables: DMTCN, DTFCD, DTFPR, DTFHT, 
DTFDI, DTFCP, and DTFSD. For reader, printer, or punch 
files, a CP CLOSE command is issued. For disk files, 
DMSFNS is called to close the file. For a disk work 
file, DMSERS is called to erase the file, unless 
DELETFL=NO is specified. 

Compares the records contained in two disk files. 

Passes a command line tc CP for execution. 

Processes the COPYFILE command to copy disk files. 

Reads an input line and makes it available to the 
caller. 

Writes an output line to the console. 

Causes the calling program to wait until all terminal 
I/O operations have been completed. 



Enables a user to dump his virtual storage from 
an executing program. 



within 



Enables the user to debug his program from the terminal, 

Entry point for program interruptions. 

Entry point for all other interruptions. 

Reads one or more 800-byte records (blocks) from disk, 

or reads one 200-byte record (sufc-block) from disk. 

Writes one or more 800-byte records (blocks) on disk, 

or writes one 200-byte record (subblock) on disk. 

Interface for the DOS DLBL command; allows the user to 
specify I/O devices extents, and certain file 
attributes for use by a program at execution time. 
DLBL can also be used to modify or delete previously 
defined disk file descriptions. 

Interface for the DOS user command. Link-edit the 
relocatable output of the language processors. Once 
link-edited, these core image phases are added to the 
end of the specified DOSLIB. 

Simulates the DOS/VS $$BDDMP and $$BPDCMP functions. 
For both functions, a CP DDME command is issued, 
directing the dump to an offline printer. 

Provides DOS SVC support. Interprets DOS SVC codes and 
passes control to appropriate routines for execution 
(for example, OPEN, CLOSE, FETCH, EXCP) . 
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Entry 
Points 



Module 
Name 



Function 



DMSDSK 
DMSDSL 

DMSDSV 
DMSEDC 

DMSEDF 

DMSEDI 

DMSEDX 
DMSERR 
DMSERS 

DMSEXC 
DMSEXT 
DMSFCH 

DMSFET 

DMSFLD 
DMSFNC 

DMSFNS 
DM S FOR 



DMSDSK 
DMSDSL 

DMSDSV 
DMSEDC 

DMSEDF 

DMSEDI 

DMSEDX 
DMSERR 
DMSERS 

DMSEXC 
DMSEXT 
DMSFCH 

DMSFET 

DMSFLD 

DMSFNC 
DMSFNCSV 

DMSFNSA 
DMSFNSE 

DMSFNST 

DMSFOR 



Dumps a disk file to cards or loads files from card to 
disk. 

Provides capability to delete members (phases) of a 
DOSLIB library; also, to compress a DOSLIB library; 
also, to list the members (phases) of a DOSLIB library. 

Lists the directories of DOS private or system packs. 

Arranges compound (overstruck) characters into an 
ordered form and disregards tab characters as special 
characters. 

Provides the Editor with the proper settings (CASE, 
TAB, FORMAT, SERIAL, etc.) by filetype. Contains 
nonexecutable code for reference by DMSEDI. 

Modifies the contents of an existing file or creates a 
new file for editing. 

Performs initialization for the CMS Editor. 

Builds a message to be written at the virtual console 
by DMSCWR. 

Deletes a file or related group of files from 
read/write disks. 

Bootstrap loader for disk version of EXEC. 

Processes the EXEC command. 

Bring a specified phase into storage from a system or 
private core image library or from a CMS DOSLIB 
library. DMSFCH is invoked via SVC 1, 2, or 4 or via 
the FETCH command. 

Provides an interface for the FETCH command; also, 
provides the capability to start execution of a 
specified phase. 

Interprets OS JCL DD parameters for use by CMS. 

Nucleus resident command name table. 
Standard SVC table. 

Closes one or more input or output disk files. 
Closes a particular file without updating the directory 
or removing it from the active file table. 
Temporarily closes all output files for a given disk. 

Physically initializes a disk space for the CMS data 
management routines. For an existing disk, any 
information on the disk may be destroyed. The label 
may be changed and the number of cylinders allowed may 
be changed. 
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Module 
Name 



Entry 
Points 



Function 



DMSFRE 



DMSGIO 
DMSGLB 

DMSGND 
DMSGRN 

DMSHDI 
DMSHDS 
DMSIFC 



DMSINA 

DMSINDEX 
DMSINI 



DMSFREB 
DMSFREES 

DMSFRETS 

DMSFREEX 
DMSFRETX 
DMSFRES 

DMSGIO 

DMSGLB 

DMSGND 
DMSGRN 



DMSHDI 
(HNDINT) 



DMSHDS 



DMSIFC 



DMSIFC76 
DMSIFC18 
DMSIFCO 

DMSINA 



DMSINDEX 

DMSINIR 
DMSINIW 



Called as a result of the DMSFREE and DMSFRET macro 
calls. Allocates or releases a block of storage 
depending upon the code in NOCON location CODE203. 
Called as a result of the SVCFREE macro call. The size 
of the block is loaded from the PLIST and a DMSFREE 
macro is executed. Upon return, the address of the 
allocated block is stored into the PLIST. 
Called as a result of the SVCFRET macro call. The size 
and address of the block to be released are loaded from 
the PLIST and a DMSFRET macro is executed. 
Called as a result of a EALR to the address in the 
NUCON location AFREE. Executes the DMSFREE macro. 
Called as a result of a EALR to the address in the 
NUCON location AFRET. Executes the DMSFRET macro. 
Called as a result of executing the DMSFRES macro. 
DMSFRES processes the following service routines: 
CKOFF, INIT1, INIT2, CHECKS, UREC, and CALOC. 
Creates the DIAGNOSE and CCWs for an I/O operation to a 
display terminal from a virtual machine. 

Defines the macro libraries to be searched during 
assembler processing. Defines text libraries to be 
searched by the loader for any unresolved external 
references. 

Generates auxiliary system status table. 

Edits STAGE1 output (STAGE2 input), builds 3705 
assembler files, link-edits text files and an EXEC 
macro file. 

Sets the CMS interruption handling functions to 
transfer control to a given location for an I/O device 
other than those normally handled by CMS, or clears 
previously initialized I/O interruption handling. 

Initializes the SVCINT SVC interruption handler to 
transfer control to a given location for a specific 
SVC number (other than 202) or to clear such previous 
handling. 

Scans and passes all non-special parameters to the 
IFCEREP1 module, initializing values to edit and print 
records from VM/370*s error recording cylinders. 
Immediately reflects SVC76 back to the calling routine. 
BLDL handler for IFCEREP1. 
EXCP handler for IFCEREP1. 

Handles either user-defined synonyms or abbreviations 
or system-defined synonyms for command names. 

Index of CMS listings in the microfiche deck. 

Reads a nucleus into main storage. 
Writes a nucleus onto a DASD device. 
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t r 

Entry 
Points 

\ 



Module 
Name 



Function 



DMSINM 

DMSINS 
DMSINS 

DHSINT 

DMSIOW 

DMSITE 

DMSITI 
DM5ITI 

DMSITP 
DMSITS 



DMSLAD 



DMSINM 
(GETCLK) 
(CMSTIMER) 

DMSINS 

DMSINS 

DHSINT 

DMSINTAB 
SUBSET 

DMSIOW, 
WAIT, 
DMSIOWR, 
W1ITRTN 

DMSITE, 
EXTINT, 
DMSITET, 
TRAP, 

DMSITI, 
IOINT, 



DMSITP 

DMSITS 
DMSITS1 

DMSITSCR 

DMSITSOR 

DMSITSK 

DMSITSXS 

DMSITSR 



DMSLAD, 

ADTLKP 

DMSLADN, 

ADTNXT, 

DMSLADW 

DMSLADAD 



Obtains the time from the CP timer. 

Controls initialization of the CMS nucleus. 

Controls initialization of the CMS nucleus. 

Reads CMS commands from the terminal and executes 
them. Entry is from DMSINS. 
Entry from DMSABN. 
CMS subset entry. 

Places the virtual CPU in the wait state until the 
completion of an I/O operation on one or more devices. 

Processes external interruptions. 



This module is entered when an I/O operation causes the 
I/O new PSW to be loaded. This module handles all I/O 
interruptions, passes control to the interruption pro- 
cessing routine, and returns control to the interrupted 
program. 

Processes program interruptions and processes SPIE 
exits. 



Avoids CP overhead due to SVC call. 

Address pointed to by the CMS SVC new PS 

is entered whenever an SVC interruption o 

Return point to which a program called 

returns when it is finished processing. 

Return point to which a program calle 

returns when it is finished processing. 

Called by an SVC by the DMSKEY macro. 

Called by an SVC from the DMSEXS macro. 

This is the DMSITS recovery and re 

routine, called by DMSABN. DMSABN is the 

routine. 

Finds the active disk table block whos 

the one supplied by the caller. 

Finds the first or the next ADT block i 

disk table. 

Finds the read or write disk accor 

parameters. 

Modifies the file status table chain 

auxiliary directory, or clears the auxili 

from the chain. 



W. This point 
ccurs. 

by a CMS SVC 

d by an OS SVC 



initialization 
ABEND recovery 

e mode matches 

n the active 

ding to input 

to include an 
ary directory 
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Points 



Module 
Name 



Function 



DMSLAF 



DMSLBM 



DMSLBT 



DMSLDR 



DMSLDS 



ucislfs 



DMSLGT 



DMSLIB 



DMSLIO 



DMSLKE 



DMSLLU 



DMSLAF, 

ACTLKP 

DMSLAFNX, 

ACTNXT, 

DMSLAFFE 

ACTFREE 



DMSLAFFT 

ACTFRET 

DMSLBM 



DMSLBT, 
TXTLIE, 



DMSLDRA 

DMSLDRB 

DMSLDRC 
DMSLDRD 

DMSLDS 

DMSLFS, 
TYPSRCH 

DMSLGTA 

DMSLGTB 

DMSLIB 

DMSLIO 

DMSLKD 
DMSLLD 



Finds the 
type, and 
Finds the 
table. 
Finds an 
new block 
if necess 
into the 
Removes a 
turns it 
Generates 
library, 
library. 



active file table block whose filename, file- 
filemode match the one supplied by the caller, 
next or first AFT block in the active file 

empty block in the active file table or adds a 
from free storage to the active file table, 

ary, and places a file status entry (if given) 

AFT block. 

n AFT block from the active file table and re- 

to free storage if necessary, 
a macro library, adds macros to an existing 

and lists the dictionary of an existing macro 



Creates a text library, adds text files to an existing 
text library, creates a disk file that lists the 
control section and entry point names in a text 
library or types, at the terminal, the control section 
and entry point names in a text library. 



Begins execution of a group of 
real storage. Definition of all 
established at location zero, 
command or internally from DMSLD 
is specified. 

Processes TEXT files that may 
cards: SLC, ICS, ESD, TXT, REP, 
and ENTRY. Entered from DMSLDP 
is requested. 

Does the processing required by 
when an invalid card is detected 
Does the processing required 
is detected in a text file. 



programs loaded into 

undefined programs is 

Entered from the START 

RB LDT routine if START 

contain the following 

RLD, END, LDT, LIBRARY, 

when the load function 

various loader routines 
in a text file, 
when a fatal I/G error 



Lists information about specified data sets residing on 
an OS disk. Processes the LISTDS coimand. 

Finds a specified 40-byte FST entry within the FST 
blocks for read-only or read/write disks. 

Entered from DMSLDRB if not a dynamic load. Frees all 
the TXTLIB blocks on the TXTLIB chain. 

Reads TXTLIB directories into a chain of free storage 
directory blocks. Entered from DMSLDRB. 

Searches TEXT libraries for undefined symbols and 
closes the libraries. 

Creates the load map en disk and types it at the 
terminal. Performs disk and typewriter output for 
DMSLDR. 

Provides an interface between CMS and the VS1 linkage 
editor. 

Lists the assignments of logical units. 
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i 




| Module 


Entry 




| Name 
i 


Points 


Function 


| DMSLOA 


DMSLOA 


Processes the LOAD and INCLUDE commands to invoke the 
relocating loader. 


| DMSLSB 


DMSLSBA 


Hexadecimal to binary conversion routine. 




DMSLSBB 


Adds a symbol to the string of locations waiting for 
an undefined symbol to be defined. 




DMSLBC 


Removes the undefined bit from the REFTBL entry and 
replaces the ADCON with the relocated value. 




DMSLBD 


Processes LDR options. 


| DMSLST 


DMSLSTA 


Processes the LISTFILE command. Prints information 
about the specified files. 


| DMSLSY 


DMSLSY 


Generates a unique character string of the form Z000001 
for private code symbols. 


| DfiSnDi? 


DMSHSP 


lypes Lhe lead sap associated with the specific file 
on the terminal- 


| DMSMOD 


DMSMOD 


Processes the GENMOD command to create a file that is a 
core image copy; processes the LOADMOD command to load 
a file that is in core image form. 


| DMSMVE 


DMSMVE 


Transfers data between two specified OS ddnaaes, the 
ddnames may specify any devices or disk files supported 
by the CMS system. 


| DMSNCP 


DMSNCP 


Reads a 3705 control program module (Emulator Program 
or Network Control Program) in CS load module format 
and writes a page-format core image copy on a VM/370 
system volume. 


| DMSNUC 


DMSNDC 


Contains CSECTS for nucleus work areas and permanent 
storage. 




NDCON 


Nucleus constant area. 




SYSREF 


Nucleus address table. 




DEVTAB 


Device table. 




ADTSECT 


Active disk table. 




AFTSECT 


Active file table. 




EXTSECT 


External interruption storage. 




IOSECT 


I/O interruption storage. 


| DMSNDC 


PGMSECT 


Program Interruption storage. 




SVCSECT 


SVC interruption storage. 




DIOSECT 


Disk I/O storage. 




FYS 


File system storage. 




OPSECT 


Parameter lists. 




CVTSECT 


Simulated OS CVT. 




DBGSECT 


Debug storage. 




TSOBLKS 


TSO control blocks. 


| DMSOLD 




Performs initialization and processing for each loading 
operation by processing text files that contain the 
following cards: SLC, ICS, ESD, TXT, REP, RLD, END, 
LDT, LIBRARY, and ENTRY. 




DMSOLD 


Entered from DMSSLN when load requested. 




DMSLDRC 


Entered when an invalid card is detected in a text 
file. 




DMSLDRD 


Entered when a fatal error occurs during loading. 
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Module 
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Entry 
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Function 



DMSOPL I DMSOPL I Reads the appropriate system directory records and 

headers and determines if the specified libraries con- 
tain any active members. Returns the disk address of 
the specified system library and indicates whether or 
not there are active members to be accessed on the disk. 

DMSOPT I DMSOPT i Sets DOS options in the System Communications Region as 

specified by the OPTION command. 

DMS0R1 I DMS0R1 I Relocates all DFT (Define The File) Table address 

constants to executable storage addresses. (Called by 
$$BOPENR via SVC 2.) 

DMS0R2 I DMSOR2 I Relocates all DTF (Define The File) Table address 

constants to executable storage addresses. (Called by 
DMS0R1.) 

DMS0R3 | DMS0R3 | Relocates all DTF (Define The File) Table address 

constants to executable storage addresses. (Called by 
DMS0R2.) 

DMSOVR | DMSOVR | Analyzes the SVCTRACE command parameter list and 

loads the DMSOVS tracing routine. 

DMSOVS | DMSOVS j Provides trace information requested by the SVCTRACE 

command. 

DHSPIO I DMSPIO | Prints one line. 

DMSPIOCC | Puts CCWs and data into the callers buffer. 
DMSPIOSI I Prints the caller's buffer, issues an SIO to the 
virtual printer, and analyzes the resulting status. 

DMSPNT | DMSPNT | Places the address of a file status table entry in the 

active file table (if necessary) , and sets the read 
pointer or write pointer for that file to a given item 
number within the file. 

DMSPHT ! DMSPRT ! Prints CMS files. 

DMSPRV I DMSPRV I Copies procedures from the DOS/VS system procedure 

library to a specified output device. 

DMSPDN | DMSPUN I Punches CMS files to the virtual card punch. 

DMSQRY I DMSQRY | Processes the QUERY command. Displays at the user's 

terminal, the status of various CBS functions and 

tables. 

DMSRDC | READCARD | Reads cards and assigns the indicated filename. 

DMSREA I DMSREA I Reads error recording cylinder pages into storage for 

EREP (IFCEREP1) processing. It passes one logical 
record for each read request. 

DMSRNS | DMSRNE I Provides an interface for the CMS Editor BENDM 

subcommand, which renumbers files with filetypes of 
VSBASIC and FREEFORT. 
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| Nodule 
| Nane 
i 


Entry 
Points 


Function 


t 

| DMSRNM 


DMSRNM 


Processes the RENAME command. Changes the fileid of 
the specified file. 


| DMSROS 
| DMSROS 


DMSROS 

ROSACC 
DMSROS+4 

ROSSTT 
DMSROS+8 

ROSRPS 
DMSROS+12 

ROSFIND 
DMSROS+16 

ROSNTPTB 


Accesses OS disks. 

Verifies the existence of OS disks. 

Reads OS disks. 

Finds a member in an OS PDS. 

Performs NOTE, POINT, and BSP functions. 


| DMSRRV 


DMSRRV 


Provides the capability to copy (to an output device) 
modules residing on DOS system or private relocatable 
libraries. 


| DMSSAB 


DMSSAB 


Processes OS ABEND macros. 


I DMSSBD 


DMSSBD 


Accesses data set records directly by item number. It 
converts record identifications given by OS BDAM macros 
into item numbers and uses these item numbers to access 
records. 


| DMSSBS 


DMSSBSRT 


Processes OS BSAM READ and WRITE macros. 
Entry for error return from call to DMSSBD. 


| DMSSCN 


DMSSCN 


Transforms the input line from a series of arguments to 
a series of 8-byte parameters. 


| DMSSCR 


DMSSCR 


Loads display buffers and issues a macro resulting in a 
CP DIAGNOSE to write to the display terminal. 


| DMSSCT 


DMSSCTNP 


Processes OS POINT, NOTI, CHECK, and FIND (type C) 




DMSSCTCK 
DMSSCTCE 


macros. 

Processes OS CHECK macro. 

Handles QSAM I/O errors for DMSSQS and PDS and keys 

errors for DMSSOP. 


I DMSSEB 


DMSSEB 


Calls device I/O routines to do I/O and sets up ECB 
and IOB return codes. 


| DMSSEG 


DMSSEG 


Contains a table of VCONS for CMS saved segment 
entries. 


| DMSSET 


DMSSET 


Processes the SET command. 


| DMSSLN 


DMSSLN 


Handles OS contents management requests issued under 
CMS (LINK, LOAD, XCTL, DELETE, ATTACH, EXIT). 


| DMSSMN 


DMSSMN 


Processes OS FREEMAIN and GETMAIN macros and CBS calls 
DMSSMNSB and DMSSMNST. 


| DMSSOP 


DMSSOP 


Processes OS OPEN and CLOSE macros. 


I DMSSQS 


DMSSQS 


Analyzes record formats and sets up the buffers 
for GET, POT, and PDTX requests. 
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DMSSRT 
DMSSRV 

DMSSSK 

DMSSTG 



DMSSTT 



DMSSVN 
DMSSVT 



DMSSYN 



DMSTIO 



DMSTMA 



DMSTPD 



DMSTPE 



DMSTQQ 



DMSTRK 



DMSSRT 



DMSSRV 



DMSSSK 



DMSSTGSB 
DMSSTGST 
DMSSTGCL 
DMSSTGSV 
DMSSTGAT 

DMSSTT 



DMSSVN 
DMSSVT 



SYNONYM 



DMSTIO 



DMSTMA 



DMSTPD 



DMSTPE 

DMSTQQ 
DMSTQQX 



DMSTRKA 
DMKSTRKX 



Arranges records within a file in descending sequential 
order. 

Provides capability to copy books from a system or 
private source statement library to a specified output 
device. 

Sets storage protect key for a specified saved system. 

Processes CMS calls to DMSSTGST and DMSSTGSB (STRINIT) 

and storage service routines. 

STRINIT. 

OS exit reset routine. 

Service routine to change nucleus variables. 

Initializes storage and sets up an anchor table. 

Locates the file status table entry for a given file 
and, if found, provides the caller with the address of 
the entry. 

Processes the OS WAIT and POST macros. 

Processes OS macros: XEAP, TIME, SPIE, RESTORE, BLDL, 
FIND, STOW, DEVTYPE, 1RKBAL, WTO, WTOR, EXTRACT, 
IDENTIFY, CHAP, TTIMER, STIMER, DEQ, SNAP, ENQ, 
FREEDBOF, STAE, DETACH, CHKPT, RDJFCB, SYNAD, 
BACKSPACE, and STAX. 

Processes the SYNONYM command. Sets up user-defined 
command names and abbreviations for CMS commands. 

Reads or writes a tape record or controls tape 
positioning. 



Reads an IEHMOVE unloaded PDS from tape and places it 
in a CMS MACLIB. 

Reads a tape consisting of card image members of a PDS 
and creates CMS disk files for each member of the data 
set. The PDS option allows reading unblocked tapes 
produced by the OS IEEPTPCH utility or blocked tapes 
produced by the OS IEHMOVE utility. The UPDATE option 
provides the "./ ADD" function to blocked or unblocked 
tapes produced by the IEBOPDTE utility. 

Processes the TAPE command to perform certain tape 

functions, such as: dump a CMS file, load a CMS file, 

set tape mode, scan, skip, rewind, run, FSF, FSR, BSF, 

BSR, ERG, and WTM. 

Allocates a 200-byte first chain link (FCL) to a 

calling program. 

Makes a 200-byte disk area no longer needed by one 

program available for allocation to another program. 

Allocates an 800-byte disk area to a calling program. 
Makes an 800-byte disk area that is no longer needed by 
one program available for allocation to another. 
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Module 
Name 



Entry 
Points 



Function 



DMSTYP 
DMSDPD 

DMSVAN 
DMSVAS 

DMSVIB 

DMSVIP 



DMSVPD 



DMSVSR 



DMSV33 



DMSXCP 

DMSZAP 

DMSZAT 
DMSZIT 
DMSZNR 
DMSZDS 



TYPE 
DMSOPD 

DMSVAN 
DMSVAS 

DMSVIB 

DMSVIP 



DMSVPD 



DMSVSR 



DMSV33 



DMSXCP 

DMSZAP 

DMSZAT 
DMSZIT 
DMSZNR 
DMSZUS 



Processes the TYPE command. Types all or a specified 
part of a given file on the user's console. 

Processes the UPDATE command. Opdates source files 
according to specifications in update files. Multiple 
updates can be made, according to specifications in 
control files that designate the update files. 



Contains table of Access 
(nonreentrant) modules. 
Contains a table of Access 
(reentrant) modules. 



Method Services 
Method 



nonshared 
Services shared 



Loads the CMS/VSAM saved system and pass control to the 
CMS/VSAM interface routine, DMSVIP. 

Finds the CMS/DOS discontiguous shared segment (DCSS) ; 
issues all necessary DOS ASSGN statements for CS user; 
maps all OS VSAM macro reguests to DOS specifications; 
eguivalents, where necessary; traps all transfers of 
control between VSAM and the OS user and sets the 
appropriate operating environment flags. 

Reads DOS, VSAM, and Access Method Services modules 
from a DOS PTF tape and writes the modules to the CMS 
user's A-disX. 

Resets any flags or fields set by VSAM processing; 
purges the VSAM discontiguous shared segment. 

Contains a table of VSAM shared (reentrant) modules and 
is contained within the CMSVSAM shared system. Dsed by 
CMSVSAM and VSAMGEN to generate the CMSVSAM shared 
system, and by CDLOAD to locate the phases within 
CMSVSAM. Dsed for system generation from the DOS/VS 
Release 33 restored starter system. Contains no exe- 
cutable code. 

Simulates the DOS EXCP function (DOS SVC 0) in the 
CMS/DOS environment. EXCP (Execute Channel Program) 
reguests initiation of an I/O operation to a specific 
logical unit. 

Processes the ZAP command. Provides a facility to 
maintain CMS LOADLIB members as written by the CMS 
command LKED. 

Defines 8K-bytes of transient area. 

Defines the end of the CMS nucleus. 

Defines the end of NUCON (DMSNOC) . 

Defines the start of the user area. 
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FSTSECT IOBCSW IOBIN 
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AWRBOF 


BATDCHS 


BATFLAGS 


E&TFLAG2 


BAT RON 


BOFFER 


CLASORI 


CLOSIO 




DEVTYPE 


ERROR 


FILE 


FILEBOFF 


FILEMODE 


FILENAME 


FMODE 


IOAREA 


NJCON 


NOM 


READ 


RPLIST 


RO 




R1 


R10 


R11 


R1U 


R15 


R2 


R3 


m 


R5 


R6 


R7 


R8 


R9 




SAVE 


TEXT 


TYPRDR 






















DMSREA 


NUM 
SAVERO 


RO 
SAVER 1 


R1 
SAVER14 


R12 
SAVER15 


R13 
SAVER2 


R1U 
TEXT 


R15 


R2 


R5 


R4 


R5 


R6 


R7 


DMSRNE 


AERASE 


AFINIS 


AINCORE 


ARDBOF 


AWRBOF 


ERROR 


FMODE 


FNAME 


F3IZE 


LOC 


NOCON 


PACK 


PLIST 




RO 


R1 


R10 


R12 


R13 


R1U 


R15 


R2 


BS 


M 


R5 


R6 


R7 




STRTNO 


TEXT 


TYPE 


VCADTLKW 
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MODULE 



EXTERNAL REFERENCES (LABELS AND MODULES) 



DMSRNM AACTLKP 


ADTCHBA 


ADTFLG1 


ADTFRO 


ADTFRW 


ADTFTYP 


ADTM 


ADTSECT 


AFTADT 


AFTSECT 


AFVS 


AKILLEX 


ASTATEW 


ATFINIS 


ATYPSRCH 


AUPDISK 


ERBIT 


ERRCOD1 


ERSFLAG 


FILE 


FSTM 


FSTN 


FSTSECT 


FSTT 


FVSECT 


FVSERASO 


FVSERAS1 


FVSERAS2 


KXFLAG 


KXWANT 


NIHMODE 


NEWNAME 


NEHTYEE 


NUCON 


NUM 


ON 


REGSAV1 


RO 


R1 


R10 


R11 


R12 


R13 


R1U 


R15 


R2 


R3 


m 


R5 


R6 


R7 


R8 


R9 


STATEFST 


TEXT 


UFDBUSY 


VCADTLKP 


VCFSTLKW 
















DMSROS ADTCYL 


ADTDTA 


ADTFDOS 


ADTFLG 1 


ADTFLG2 


ADTFLG3 


ADTFOHCE 


ADTFROS 


ADTFRWOS 


ADTM 


ADTSECT 


BALR 


CC 


CSW 


DOSFIRST 


DOSFLAGS 


DOSSVC 


BTAD 


FCBBLKSZ 


FCBDSMD 


FCBDSNAM 


FCEDSTYP 


FCBFIRST 


FCBIOSH2 


FCBLRECL 


FCBMEMBR 


FCBMVPDS 


FCBNEXT 


FCBOP 


FCBOSDSN 


FCBOSFST 


FCBPROC 


FCBRECFM 


FCBSECT 


FILEEUFF 


FILEBYTE 


FILENAME 


FILEREAD 


LOC 


NUCON 


OPSECT 


OSADTDSK 


OSADTFST 


SAD T VTA 


OSADTVTB 


OSFST 


OSFSTALT 


OSFST ELK 


OSFSTCHR 


OSFSTEBK 


OSFSTDSK 


OSFSTDSN 


OSFSTEND 


OSFSTEX4 


OSFSTFLG 


OSFSTFM 


OSFSTFVF 


OSFSTLRL 


OSFSTLTH 


OSFSTMEM 


OSFSTMVL 


OSFSTNTE 


OSFSTNXT 


OSFSTRFM 


OSFSTRSW 


OSFSTTRK 


OSFSTTYP 


OSFSTUMV 


OSFSTXNO 


OSFSTXTN 


PO 


PS 


READBLK 


RO 


R1 


R10 


R11 


R12 


R1U 


R15 


R2 


R3 


R4 


R5 


R6 


R7 


R8 


R9 


SAVEREGS 


SEEK 


SKIP 


TEXT 


TYPE 


TYP3350 


UND 


VAR 


VCADTNXT 


ZEROES 














DMSRRV AERASE 


AFINIS 


AREA 


ASTATE 


ASYSREF 


AWRBUF 


BGCOM 


BLANKS 


CC 


CDISK 


DOSDD 


DOSDEV 


DOSDSK 


DOSFIRST 


DOSFLAGS 


DOSMODE 


DOSOP 


DOSOSFST 


DOSSECT 


DSKLST 


ERROR 


FNAME 


FTYPE 


INPUT 


LUBPT 


NUCON 


OSFST 


OSFSTDSK 


OSFSTXTN 


OUTBUF 


PDBPT 


RDCOUNT 


RDDATA 


RESET 


RO 


R1 


R10 


R11 


R12 


R14 


R15 


R2 


R3 


R4 


R5 


R6 


R7 


R8 


R9 


SAVE1 


SEARCH 


SEEK 
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00 



DMSSAB 



DMSSBD 



DMSSBS 



DMSSCN 



DMSSCR 



AABNSVC ACMSSEG ADMSFREB AOSMODL 

EGPRS EGPRO EGPR1 EGPR 1 1 

FCBSECT LRSTUSER LINKLAST LOC 

R11 R12 R13 R14 

SCBPTR SCBSAV12 SCBHORK SETUP 



APGMSECT BALR 

EGPR12 EGPR14 

NDCON OLDPSH 

R15 R2 

SETUP2 SSAVE 



CALLEE CCDE203 

EGPR15 EGPR9 

PGMOPSW PGMSECT 

R3 R4 

SSAVEPRV STAEBIT 



DA DATAEND DECAREA DECKYADR DECLNGTH DECRECPT DECSDECB DECTYPE 

FCBKEYS FCBOP FCBRECFM FCBSECT FCBXTENT FINIS IHADECB IOBIN 

KEYOP KEYSECT KEYTBLAD KEYTBLNO OPSECT PS RO R1 

R2 R3 R4 R5 R6 R7 R8 R9 



CURRSAVE DCSSAVAL DCSSFLAG DCSSVTLD DEBDCBAD 

ERRCOEE FCBED FCEDEV FCBDUM FCBFIRST 

RESET RETRYEIT RO R1 R10 

R5 R6 R7 R8 R9 

STAIEIT TPFUSR TYPE TYPFLAG USAVEPTR 

DMSSES DMSSBSRT DUMMY FCBBYTE FCBITEM 

IOBICFLG KEYCHNG KEYCOUT KEYLNGTH KEYNAME 

R10 R11 R12 R14 R15 

SEBSAV SKEY TBLLNGTH VAR 



AOPSECT CHNGBYTE DA DECAREA DECDCBAD DECIOBPT DECLNGTH DECSDECB DECTYPE DMSSBD 

FCBCATML FCBCOUT FCBDEV FCBDSMD FCBDSNAM FCBINIT FCBITEM FCBMODE FCECE FCBOS 

FCBTAP FCBTBSP FCBXTENT IHADEB IHADECB IOBBCSW IOBBECBP IOBBFLG IOECSH IOBIN 

OPSECT OSIOTYPE PO PREVIOUS PS READ RO R1 R11 R12 



DMSSEB FCBBUFF 
FCBPDS FCBREAD 
IOBIOFLG IOBOUT 
R13 R14 



R2 



R3 



RU 



BALRSAVE CMNDLIST NUCON 
R7 R8 



R5 



RO 



R6 



R1 



R8 



R12 



TAPEDEV TAPELIST TAPEMASK TAPEOPER UND 



R14 



R15 



R2 



R3 



R4 



VAR 



R5 



FCBBYTE 

FCBSECT 

NUCON 

R15 

WRITE 

R6 



BUFFLOC CHNGFLAG DECLTH DMSGIO 

FV GIOPLIST HOLDFLAG ITEM 

R12 R13 R1U R15 

SCLNO SCRBUFAD SCRFLGS SCRFLG2 
Y2 



EDCB EDMSK 

LINELOC NUM 

R2 R3 

TABLIN TEXT 



ERROR 


FLAG 


FLftGLOC 


FLAG2 


NUMLOC 


PTR1 


PTR2 


RO 


M 


R5 


R6 


R7 


TRUNCCL 


TWITCH 


TYPE 


TYPSCR 



FMODE FNAME FTYPE 

R1 R10 R11 

R9 SAVCNT SAVEAR 

UTILFLAG VERC0L1 VERLEN 
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MODULE 



DMSSCT 



DMSSEB 



EXTERNAL REFERENCES (LABELS AND MODULES) 



DMSSMN 



DMSSOP 



ADMSROS AOPSECT CMSOP 

FCBIOSH FCBITEM FCBOP 

IOBCSW IOBIOFLG IOBOOT 

R12 R13 R14 

ADHSROS AOPSECT DLK 

DUMMY FCBBUFF FCBBYTE FCBCASE FCBCOUT FCBDE7 

FCBITEM FCBMEMBR FCBMODE FCBMVFIL FCBMVPDS FCBOP 

FCBR13 FCBSECT FCBTAPID FXD IHADECB IOBBCSH 

PRINTLST PS PUNCHLST RDBUFF RDCCW RDCOUNT 

R2 R3 R8 SAVER1U SEBSAV TAPE 

TSOATCNL TSOFLAGS TYPE UND VAR 



DA DHCDCBAD DECIOBPT DECSDECB FCBCATML FCECLOSE FCBCOUT FCBDEV FCBDSNAM FCBINIT 

FCBOS FCBOSFST FCBPDS FCBR13 FCBSECT FCBTAF FILENAME IHADEB IHADECB IOBBFLG 

MACDIRC MACLIBL NUCON NUM OESECT PS RESET RO R1 R11 

R15 R2 R3 RU R5 R6 R7 R8 R9 SAVER14 



CMNDLINE CONRDCNT CONRDCOD CONREAD CONSOLE CONWR 

FCBDSHD FCBDSTYP FCEFORM 
FCBOPCB FCBOS FCBPRCC 
IOBBECBC ICEBECBP IOBIN 
READLST RO R1 
TAPEBOFF TAPECOUT lAPFEEV 



CONWREUF CONWRCNT CONWRCOD CONWRITE 



FCBINIT FCBIO 
FCBPRPU FCBREAD 
IOEIOFLG NUCON 
R11 R13 



FCBIOSW FCBI0SH2 
FCBRECFM FCBRECL 
OPSECT PO 
R14 R15 



TAPELIST TAPEMASK TAPEOPER TAPESIZE 



DMSSEG 


DMSEDC 


DMSEDI 


DMSEXT 


DMSGIO 


DMSLGT 


DMSLIB 


DHSLSB 


DMSLSY 


DMSCLD 


DMSSAE 


DMSSBD 


DMSSBS 


DMSSCR 




DMSSCT 


DMSSEB 


DMSSLN 


DMSSMN 


DMSSOP 


DMSSQS 


DMSSVN 


DMSSVT 












DMSSET 


ABATABND 


ABGCOM 


ACMSSEG 


ADEVTAB 


ADMSERL 


ADMSFREB 


ADMSFET 


ADOSDCSS 


ADTDTA 


ADTFDOS 


ADTFLG2 


ADTM 


ADTSECT 




AEXTSECT 


AFREETAB 


AINTRTBL 


ALDRTBLS 


ALTASAVE 


AOSMODL 


AOUTRTBL 


APPSAVE 


AREA 


ASTATE 


ASYSCOM 


ASYSNAMS 


ASYSREF 




AUSRAREA 


BALR 


BATDCMS 


BATFLAGS 


BATFLAG2 


BATNOEX 


BATRUN 


BGCOM 


CC 


CMS DOS 


CMSSEG 


CMSVSAM 


CODE 




CODS203 


CPULOG 


CURRDATE 


DCSSAVAL 


DCSSFLAG 


DCSSJLNS 


DCSSLDED 


DCSSVTLD 


DEC 


DMSDBG 


BOS FLAGS 


EOSKPART 


DOSMODE 




DOSSVC 


DOSTRANS 


DOSVSAM 


ERROR 


EXTSECT 


FRDSECT 


FREELCHE 


FREEL0H1 


FRERESPG 


JCSH3 


JCSW4 


JOBDATE 


LOADSTRT 




LOC 


LOCCNT 


LTK 


LUBPT 


MAINHIGH 


MI SF LAGS 


MODFLGS 


MSGFLAGS 


NEGITS 


NOAEBREV 


NOIMPCP 


NOIMPEX 


NOPAGREL 




NORDYMSG 


NORDYTIM 


NOVMREAD 


NUCKEY 


NOCON 


NUM 


OFF 


OS 


OPTFLAGS 


OSMODLDW 


PIBPT 


PPEND 


PRFPOFF 




PROTFLAG 


PUBPT 


REDERRID 


RESET 


RGPRS 


RO 


R1 


R10 


R11 


R12 


R14 


R15 


R2 




R3 


R4 


R5 


R6 


R7 


R8 


R9 


SEARCH 


3EEK 


S0B1 


STRTADDR 


SYSCODE 


SYSLINE 




SYSLOAD 


SYSNAMES 


SYSNEND 


SYSREF 


SYSTEM 


TBENT 


TEXT 


TIC 


TIMCCW 


TIMCHAR 


T IM ER 


TIM IN IT 


TSOBLKS 




TYPE 


UPSI 


UPTMID 


UPTSWS 


USERCODE 


USERKEY 


VCADTLKP 


VIRTUAL 


7MSIZE 










DMSSLN 


ADMSFREB 


ADTRANS 


AFINIS 


AFVS 


ALDRTBLS 


ALIASENT 


APGMSECT 


ARDBUF 


ftSTATE 


ASVCSECT 


AUSRAREA 


BALR 


CODE203 




COMPSHT 


CURRSAVE 


DM SOLD 


DMSSMN SB 


DSKLIN 


DUMCOM 


DYLD 


DYLIBO 


DYMERNM 


DYNAEND 


EGPRS 


EGPRO 


EGPR1 




EGPR13 


EGPR14 


EGPR15 


ERROR 


FILE 


FREELOWE 


FRSTLCC 


FVSECT 


F65535 


LASTLMOD 


LASTTMOD 


LDRFLAGS 


LINKLAST 



LINKSTRT LOC LOCCNT MODLIST 

SCBPTR SSAVE STRTADDR SUBACT 

ABGCOM AUSRAREA BALRSAVE BGCOM 

MAINHIGH MAINLIST MAINSTRT NUCON 

R15 R2 R3 R4 
VIRTUAL 



NDCON 
SUBFLAG 



OLDPSW 
SVCSECT 



OSRESET 
SYSTEM 



OSSFLAGS DSTEMP 



TBENT 



COMPSHT CURRSAVE DMSDBG EGPR1 
OSSFLAGS OSSMNU PPEND RO 

R5 R6 R7 R8 



TEXT 

SGPR15 

31 

89 



PGMSECT PRFTSYS PRFUSYS PROTFLAG 
USAVEPTR 

EOCADR FREELOWE FRERESPG LOCCNT 
R10 R12 R13 R1U 

SSAVE TEXT TIMCHAR TOTLIBS 



AACTLKP ACBID ACMSCVT ADMSFREB ADTFLG1 ADTFRO ADTM ADTNACW 

AFTFST AFTIC AFTIN AFTPFST AFTSECT AFVS AOPSECT AOSRET 

CMSCVT CMSHAME CMSOP CODE203 CURRSAVE CVTAVIB DA DCBSAV 

DMSSCTCE DMSSCTCK DMSSCTNP DMSSQSGT DMSSQSPT DMSSQSUP DOSDIRC DOSLIBL 

FCBBUFF FCBBYTE FCBCASE FCBCATML FCBCLEAV FCBCLOSE FCBCOF FCBCOUT 



ADTSECT AERASI AFINIS AFTADT AFTFLG 

ftSTATE AUPDISK BALR BLK CDISK 

DEEDCEAB DEBDEEIE DEBOPATB DEVTYP DMSSBS 

EGPRO EGPR1 EGPR15 EGPR2 FCBBLKSZ 
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FCBECECT FCBDD 



FCBDEV 



FCBDOSL FCBDSK 



FCBDSMD FCBDSNAM FCBDSTYP FCBDUM FCBFIRST FCBFORM FCBINIT FCBIOSH FCBICSH2 FCBITEM FCEKEYS FCBLRECL FCBMEMBR 



MODULE 



EXTERNAL REFERENCES (LABELS AND MODULES) 



FCBMODE FCBMVPDS FCBOP FCBOS FCBOSFST FCBPDS FCBPRCC FCBPROCC FCBPROCO FCBRDR FCBRECFM FCBRECL FCBSECT 

FCBTAP FCBTCLOS FCBXTENT FILEBYTE FILEMODE FILENAME FILEREAD FILETYFE FSTD FSTFLAGS FSTFMODE FSTRWDSK FSTXRDSK 

FVSECT FXD F6 IHADEB IOBDCBPT IOBEND IOBIN IOBIOFLG IOBNXTAE IOBSTART JFCBIND2 JFCBMASK JFCDSORG 

JFCKEYLE JFCLIMCT JFCOPTCD LASTUSER LOG MACDIRC MACLIEL NUCON NUM OPSECT OSFST OSFSTBLK OSFSTCHR 

OSFSTLRL OSFSTRFM OSIOTYPE PLIST PO PREVIOUS PS QS RESET RO R1 R10 R11 

R12 R13 R14 R15 R2 R3 R4 R5 R6 R7 R8 R9 SAVER1 

SAVER15 SSAVE STATERO TAPEDEV TAPELIST TAPEMASK TAPEOEER TEFACB TYPE TYPFLAG UND USAVEPTR VAR 



DMSSQS 



DMSSRT 



DMSSRV 



AOPSECT BLK 
FCBIORD FCBIOSW 
IOBIOFLG IOBODT 
R11 R12 



DEBTCBAD DMSSCTCE DMSSCTCK DMSSEB 
FCBIOWR FCBITEM FCBOP 
IOBSTART IOBUPD LOG 
R13 R14 R15 



ASCANO 
RO 



ASTRINIT DEC 
R 1 R12 



AERASE AFINIS 
DOSMODE DOSOP 
OSFSTXTN OUTBUF 
R3 R4 



DOSFLAGS DOSSVC 
R14 R15 



ASTATE ASYSREF AWRBUF 

DOSOSFST DOSSECT DSKLST 

PUBPT RDCQUNT REDATA 

R5 R9 SAVE1 



DMSSEB 


FCBBUFF 


FCBBYTE 


FCBCLCSE 


FCBCOUT 


FCBDEV 


FCBDSMD 


FCBINIT 


FCBPVMB 


FCBREAD 


FCBSECT 


FXD 


IHADEE 


IOEECB 


IOBECBPT 


IOBIN 


NUCON 


OPSECT 


OSIOTYPE 


PREVIOUS 


PS 


RO 


R1 


R10 


R2 


R3 


m 


R5 


R6 


R7 


UND 


VAR 


FINIS 


FLAG 


INSIZE 


MIS FLAGS 


NUCON 


NUM 


RELPAGES 


RESET 


R2 


R3 


R« 


R5 


R6 


SKIP 


TEXT 


VCADTLKW 


BGCOM 


CC 


CDISK 


DOSED 


DOSDEV 


DOSDSK 


DOSFIRST 


DOSFLAGS 


ERROR 


FNAME 


FTYPE 


INPUT 


LUBPT 


NUCON 


OSFST 


OSFSTDSK 


RESET 


RO 


R1 


R10 


R12 


R10 


R15 


R2 


SEARCH 


SEEK 


SENSE 


TEXT 


TIC 









DMSSSK 



I 



CD 



DMSSVT 



DEC 
R6 



HEX 
R8 



NUCON 
R9 



NUM 
SYSTEM 



RO 
TEXT 



R1 
VMSIZE 



R12 



R14 



R15 



R2 



R3 



RU 



R5 



DMSSTG ABGCOM ADMSFREB AEXTSECT ALDRTBLS ANCHENDA ANCHSECT ANCHSIZ APGMSECT ASTATEXT ASYSCOM ATSOCPPL AUSRAREA BALR 



BALRSAVE BGCOM 
DYMBRNM EGPR12 
LOCCNT MACDIRC 
PGMSECT PICADDR 
R4 R5 
USAVEPTR VIPINIT 



CODE203 COMPSWT CORESIZE CURRSAVE DMSDBG DBSLGTA DOSFLAGS DOSKPART DOSVSAM DYLD 



DYLIBO 



EGPR14 EGPR15 EOCADR EXTSECT FREELCWE FBERESPG F1 

MACLIBL MAINHIGH MAINLIST MAINSTRT MISFLAGS NUCON OLDPSW 

PPEND RELPAGES RO R1 R10 R12 R13 

R6 R7 R8 R9 SCBPTH SCBWORK SSAVE 

VSAMFLG1 VSAMRUN VSAMSERV 



DMSSTT 


AACTLKP 


ADMSERL 


ADTFLG1 


ADTFLG2 


ADTFRO 


ADTFROS 


ADTFRfl 


ADTM 


ADTMX 




AFTRD 


AFTSECT 


AFTWRT 


AFVS 


BALR 12 


DMSERR 


DMSLAD 


DMSLADW 


BMSLFS 




FSTFAW 


FSTFB 


FSTFRO 


FSTFROX 


FSTFRW 


FSTFRWX 


FSTB 


FSTSECT 


FVSECT 




NUCON 


OSFST 


OSFSTFLG 


OSFSTFM 


REGSAV3 


RO 


R1 


R10 


R12 




R3 


R4 


R5 


R6 


R9 


STATEFST 


STATERO 


TEXT 




DMSSVN 


ADMSFREB 


AEXTSECT 


AOPSECT 


ATTN 


BALR 


CODE203 


CONRDBUF 


CCNRDCNT 


CONREC 



IJBBOX LINKLAST LINKSTRT LOC 

OPTNBYTE OSSFLAGS PCTVSAM PDSSECT 

R1U R15 R2 R3 

STIMEXIT SYS COM TAXEADDR TIMCHAR 



ADTSECT AFTADT AFTFLG AFTFST 

DHSLFSW FILE FSTFAP FSTFAR 

FVSFSTAD FVSFSTDT FVSFSTM FVSFSTN 

R13 R1U R15 R2 



CONWRCOD CONWRITE CURRSAVE DMSDBG 
NUCON NUMFINRD NUMPNDWR OPSECT 
R12 R13 R1U R15 



EGPRO EGPR1 
OSSFLAGS OSNAIT 
R2 R3 



ZCINREAD CONSTACK CONHRBUF CONWRCNT 

EGPR15 EXTFLAG EXTSECT FCBSECT FSTFINRD LOC LSTFINRD 

PENDREAD PENDWRIT PS REALTIMR RO R1 R10 

RU R5 R6 R8 SSAVE STIMEXIT TIMCHAR 



TIMER 



TIMINIT TSOATCNL TSOFLAGS HAITEND 



ADMPEXEC ADMSFREB ADMSROS AERASE AEXTSECT AOPSECT APGMSECT APIE ARDEUF ASTATE ATFINIS AUPDISK AWRBUF 
BALR CALLER CHNGBYTE CMNDLINE CMSNAME CMSOP CMSTAXE CODE203 CONRDCNT CONREAD CONHRBUF CONWRCNT CONWRITE 
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MODULE 



EXTERNAL REFERENCES (LABELS AND MODULES) 



DMSSYN 



DM ST 10 



DMSTMA 



DMSTPD 



DMSTPE 



DMSTQQ 



DMSTRK 



CORESIZE 

DMSLSB 

DMSSMN10 

DMSSVN94 

EGPR15 

FCBDUM 

FCBSECT 

IHADEB 

KEYSECT 

OLDPSW 

READBLK 

R5 

TBLLNGTH 

WAITLIST 



CURRDATE 

DMSSAB 

DMSSMN4 

DOSDD 

EGPR2 

FCBFIRST 

FCBTAB 

IHADECB 

KEYTABLE 

OPSECT 

RESET 

R6 

TEMPBYTE 



CURRSAVE 

DMSSBDFR 

DMSSMN5 

DOSDIRC 

EXTSECT 

FCBFORM 

FCBTAP 

IHAJFCB 

KEYTBLAD 

OSIOTYPE 

RO 

R7 

TEXTA 



DATAEND 

DMSSBS 

DMSSOP 

DOSFIRST 

FCBBUFF 

FCBINIT 

FCBTBSP 

IOBIN 

KEYTBLNO 

OSRESET 

R1 

R8 

TEXT3 



DATE 

DHSSCT 

DMSS0P19 

DOSLIBL 

FCBBYTE 

FCBI0SW2 

FCBXTENT 

IOBIOFLG 

KEYTYPE 

OSSFLAGS 

R10 

R9 

TIMBUF 



AFINIS AFST 

OPTFLAGS RO 

R8 SYSCOM 



ADEVTAB 
R11 



ATABEND 
R12 



BLK CSW 
R15 R2 
VIRTUAL 



ARDBUF 

R1 

TEXT 

CC 
R13 

DMSLIB 
R3 



A STATE 

R11 

TYPE 

CSW 
R14 

ERROR 
R4 



AUSABRV 
R12 



DECSDECB 

DMSSLN 

DMSSOP20 

DOSNEXT 

FCBCATML 

FCBITEM 

FILEBUFF 

JFCBMASK 

LINKSTRT 

OSTEMP 

R11 

SCBPTR 

TIMCHAR 



BLANKS 
R14 



DEVTAE 

DMSSLH3 

DMSSOF22 

DOSSECT 

FCBCOUT 

FCBKEYS 

FILEBSTE 

JFCLRECL 

LOC 

PDSBLKSI 

R12 

SEARCH 

TIMER 



ERRCODE 
R15 



DEVTYPE 

DMSSLNU2 

DMSS0P23 

DUHPLIST 

FCEDD 

FCEHMV 

FILECOUT 

KEYCHNG 

LOWSAVE 

PDSDIR 

R13 

SSAVE 

TYPE 



ERROR 
R2 



DIAGTIME 

DMSSLN6 

DMSSC.S 

EFPRS 

FCBEEV 

FCBMVErS 

FILEITEM 

KEYCCUT 

MACEIHC 

PDSSICT 

Rlt 

ST IM EX IT 

OSAVEPTR 



FILE 
S3 
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DMSSQS 
















H- 1 

(D 


UNPACK 


000013 


DWSCPY 


DMSEXT 


DMSLIO 






















UNRES 


000005 


DMSLDR 


DMSLOA 


DMSOLD 




















O 
M 
O 


UPBIT 


000006 


DBS ACM 


DMSAUD 


DMSDSK 




















UPS I 


000004 


DMSSET 
























W 


UPTMID 


000002 


DMSSET 
























w 


UPTSWS 


000002 


DMSSET 
























CD 


USARCODE 


000002 


DMSFRE 
























(0 


USAVE 


000003 


DMSITS 
























CD 


USAVEPTR 


000025 


DMSITS 


DMSSAB 


DMSSLN 


CMSSOP 


DMSSTG 


DMSSVT 














M 


USAVESZ 


000005 


DMSITS 
























CD 


USERCODE 


000004 


DMSFRE 


DMSSET 






















USERKEY 


000012 


DMSABN 


DMSDBG 


DMSFRE 


DMSITS 


DMSLDR 


DMSSET 














CD 


UTILFLAG 


000020 


DMSEDI 


DKSSCR 
























VAR 


000033 


DMSOR1 


DMSROS 


DMSSBD 


EKSSBS 


DMSSEB 


DMSSOP 


DMSSQS 


DMSSVT 


DMSTPD 


DMSXCP 








VCADTLKP 


000029 


DMSACC 


DMSACM 


DMSALU 


EHSARE 
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CMS Diagnostic Aids 



This section contains the following information: 

• A list of devices Supported by a CHS Virtual Machine 

• DHSFREX Error Codes 

• Abend Codes 
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Supported Devices 



Figure 23 indicates those devices that are supported by a CHS 
machine. 



I Virtual 


Virtual 


Symbolic 








I IBM Device 


Address 1 


Name 




Device Type 


I 3210, 3215, 


1052, 


cuu 


CON1 


System console 


I 3066, 3270 














I 2314, 3330, 


3340 


190 


DSK0 


System disk (read-only) 


I 3350 














I 2314, 3330, 


3340 


1912 


DSK1 


Primary disk (user files) 


I 3350 














| 2314, 2319, 


3330, 


cuu 


DSK2 


Disk 


(user 


files) 


I 3340, 3350 














| 2314, 2319, 


3330, 


cuu 


DSK3 


Disk 


(user 


files) 


I 3340, 3350 














j 2314, 2319, 


3330, 


192 


DSK4 


Disk 


(user 


files) 


I 3340, 3350 














j 2314, 2319, 


3330, 


cuu 


DSK5 


Disk 


(user 


files) 


I 3340, 3350 














| 2314, 2319, 


3330, 


cuu 


DSK6 


Disk 


(user 


files) 


| 3340, 3350 














I 2314, 2319, 


3330, 


cuu 


DSK7 


Disk 


(user 


files) 


I 3340, 3350 














I 2314, 2319, 


3330, 


19E 


DSK8 


Disk 


(user 


files) 


| 3340, 3350 














| 2314, 2319, 


3330, 


cuu 


DSK9 


Disk 


(user 


files) 


! 3340, 3350 














I 1403, 3203, 


3211, 


00E 


PRN1 


Line 


printer 


| 1443 














I 2540, 2501, 


3505 


00C 


RDR1 


Card 


reader 


I 2540, 3525 




00D 


PCH1 


Card 


punch 




| 2415, 2420, 


3410, 


181-4 


TAP1-TAP4 


Tape 


drives 


! 3420 














I *The device 


addrej 


>ses shown 


are those that are preassembled into the 


i CMS resident dev] 


Lee table. 


These neec 


1 only 


be modified and a new 


I device table made 


» resident 


to change the addresses. 


I 2 The virtual devic 


:e address 


(cuu) of a 


disk for user files can be 


I any valid System/ 


'370 devic* 


» address, and can be specified by the 


I CMS user when he 


activates 


a disk. 11 


f the user does not activate 


I a disk immediate! 


Ly after 1< 


jading CMS, 


CMS automatically activates 


I the primary disk 


at virtual 


. address 1< 


n. 







Figure 23. Devices Supported by a CMS Virtual Machine 
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DMSFREX Error Codes 



Error Codes from DMSFREE, DMSFRES, and 
DMSFRET 

A nonzero return code upon return from DMSFRES, DMSFREE, or DMSFRET 
indicates that the request could not be satisfied. Register 15 contains 
this return code, indicating which error has occurred. The codes below 
apply to the DMSFRES, DMSFREE and DMSFRET macros, described on the 
following pages. 

Code Error 

1 (DMSFREE) Insufficient storage space is available to satisfy the 
request for free storage. In the case of a variable request, the 
minimum request could not be satisfied. 

2 (DMSFREE or DMSFRET) Oser storage pointers destroyed. 

3 (DMSFREE or DMSFRET) Nucleus storage pointers destroyed. 

4 (DMSFREE) An invalid size was requested. This error exit is taken 
if the requested size is not greater than zero. In the case of 
variable requests, this error exit is taken if the minimum request 
is greater than the maximum request. However, the error is not 
detected if DMSFREE is able to satisfy the maximum request. 

5 (DMSFRET) An invalid size was passed to the DMSFRET macro. This 
error exit is taken if the specified length is not positive. 

6 (DMSFRET) The block of storage that is being released was never 
allocated by DMSFREE. This error occurs if one of the following 
errors is found: 

a. The block is not entirely inside either the low-core free 
storage area or the user program area between FREELOWE and 
FREEUPPR. 

b. The block crosses a page boundary that separates a page 
allocated for OSER storage from a page allocated for NUCLEUS 
storage. 

c. The block overlaps another block already on the free storage 
chain. 

7 (DMSFRET) The address given for the block being released is not a 
doublewcrd boundary address. 

8 (DMSFRES) An illegal request code was passed to the DMSFRES 
routine. Because the DMSFRES macro generates all codes, this 
error cede should never appear. 

9 (DMSFRE, DMSFRET, or DMSFRES) Unexpected internal error. 
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Abend Codes 



Abend Recovery 



Modules Used: DMSABN 

Operation of the Abend Routine, DMSABN 

When the abend recovery routine is entered, it types out the abend 
isssa' 1 ©,- followed b v the line ,, CMS M , to indicate to the user that he say 
type in his next command. 

At this point, there are two options available to the user. 

First, he may type the DEBUG command. In this case, DMSABN passes 
control to DMSDBG, to make the facilities of DEBUG available to him. 
DEBUG' s PSW and registers are as they were at the time that the abend 
recovery routine was invoked. From DEBUG, the user may alter the PSW or 
registers, as he wishes, and type GO to continue processing, or type 
RETURN to return to DMSABN, so that abend recovery can continue. 

The second option available is to type in any other command. If this 
is done, DMSABN performs its abend recovery function and passes control 
to DMSINT to execute the command that has been typed in. 

The abend recovery function consists of the following steps: 

1. The SVC handler, DMSITS, is reinitialized, and all stacked save 
areas are released. 

2. "FINIS * * *» is invoked by means of SVC 202, to close all files, 
and to update the user file directory. 

3. If the EXEC interpreter (EXECTOR module) is in storage, it is 
released. 

4. All link blocks allocated by the OS macros simulation routine 
DMSSLN are freed. 

5. If VSAM or Access Method Services are still active, call DMSVSR for 
cleanup. 

6. All FCB and DOSCB pointers are zeroed out. 

7. All user storage is released. 

8. The amount of system free storage that should be allocated is 
computed. This figure is compared against the amount of free 
storage that is actually allocated. If the two are egual, then 
storage recovery can be considered successful. If they are 
unegual, then a message is sent to the user. 
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UNRECOVERABLE TERMINATION — THE HALT OPTION OF DMSERR 

There are certain times, such as when the SVC handler's pointers are 
modified, that the system can neither continue processing nor try to 
recover. In these cases, DMSERR with the option HALT=YES is specified 
to cause a message to be typed out, after which a disabled wait state 
I PSW is loaded unless the NOCON field AOSERRST has been loaded. 

I The valid address contained in AOSERRST is assumed to be the address 

I of an error recovery routine and will be directly branched to. The 

I initialization routines of an application running under CMS must set 

I this address to point to a module that might, for example, request a 

I dump and then issue an IPL command. If the IPL command is 

| IPL CMS PARM AOTOCR 

I and the PROFILE EXEC on virtual disk 191 invokes reinitialization, the 

I application has the capability of automatic recovery. This capability 

I is valuable for CMS service virtual machines that run permanently 

! disconnected and are required to stay operational. 

In CP mode, the programmer can examine the PSR, whose address field 
contains the address of the instruction following the call to the DMSEBR 
macro. He can also examine all the registers, which are as they were 
when the DMSERR macro was invoked. 

Figure 24 lists the CMS ABEND codes and describes the cause of the 
Abend and the action required. 
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1 Abend) Module | I | 
I Code | Name | Cause of Abend | Action | 


I 001 | DMSSCT | The problem program encoun- I Message DHSSCT120S | 
I | I tered an input/output error | indicates the possible | 
• I I processing an OS macro* j cause of the error. | 
I | | Either the associated DCB I Examine the error | 
I | | did not have a SYNAD rou- | message and take the | 
I | I tine specified or the I/O | action indicated. | 
I | | error was encountered I I 
I | | processing an OS CLOSE | I 
I | | macro. I I 


I 034 | DMSVIP | The problem program encoun- I Refer to the DOS/VS | 
j j | tered an I/O error while j Messages Reference, I 
I | | processing a VSAM action I Order No. GC33-5379, | 
i i i macro under DOS-^VS for ' to determine the cause I 
I | | which there is no OS egui- | of the VSAM error. | 
1 | I valent. An internal error | 1 
I | I occurred in a DOS VSAM rou- I 1 
1 I 1 tine. I I 


I OCx | DMSITP | The specified hardware ex- | Type DEBUG to exaiine | 
i j i ception occurred at a spe- j the PSS and registers I 
I | 1 cified location. "x H is | at the time of the | 
I | | the type of exception: | exception. 1 
1 1 1 x Tyj>e I I 
I | | IMPRECISE J | 
1 | | 1 OPERATION | ! 
I | | 2 PRIVILEGED OPERATION | I 
I | | 3 EXECUTE | I 
I | | 4 PROTECTION | I 
I | | 5 ADDRESSING | I 
I | | 6 SPECIFICATION | I 
I | | 7 DECIMAL DATA | I 
I | | 8 FIXED-POINT OVERFLOW | I 
I | | 9 FIXED-POINT DIVIDE | J 
I | | A DECIMAL OVERFLOW | I 
I | IB DECIMAL DIVIDE J I 
j | | C EXPONENT OVERFLOW | I 
} | jD EXPONENT UNDERFLOW [ \ 
I | |E SIGNIFICANCE | I 
I | |F FLOATING-POINT DIVIDE | I 


I OFO | DMSITS | Insufficient free storage | If the abend was | 
I | | is available to allocate a j caused by an error in I 
I I I save area for an SVC call. I the application pro- | 
III I gram, correct it; if j 
III j not, use the CP DEFINE | 
III I command to increase | 
III I the size of virtual j 
III I storage and then re- I 
III I start CHS. I 


I 0F1 | DMSITS | An invalid halfword code is I Enter DEBUG and type | 
I | I associated with SVC 203. | GO. Execution conti- | 
III I nues. I 



Figure 24. CMS Abend Codes (Part 1 of 4) 
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r i 

| Abend! Module | I 

I Code | Name | Cause of Abend | Action 


| 0F2 | DMSITS | The CMS nesting level of 20 | None. abend recovery 
| | | has been exceeded. | takes place when the 
III I next command is en- 
III I tered. 


| 0F3 | DMSITS | CMS SVC (202 or 203) in- I Enter DEBUG and type 
I I | struction was executed and | GO. Control returns to 
I I I provision was made for an | the point to which a 
I | | error return from the rou- | normal return would 
| | | tine processing the SVC. | have been made. 


| 0F4 | DMSITS | The DMSKEY key stack over- | Enter DEBDG and type 
| | I flowed. I GO. Execution conti- 
III I nues and the DHSKET 
III I macro is ignored. 


1 0F5 1 DMSTTS ! The nMSKT?Y key stack under- j 
| | | flowed. I 


I 0F6 | DMSITS | The DMSKEY key stack was I Enter DEBUG and type 
| | | not empty when control re- | GO. Control returns 
I | | turned from a command or | from the command or 
I | | function. 1 function as if the key 
III I stack had been empty. 


I 0F7 | DMSFRE | Occurs when TYPCALL=SVC | When a system abend 
| | | (the default) is specified | occurs, use DEBUG to 
I | | in the DMSFREE or DMSFRET | attempt recovery. 
I | | macro. I 


I 0F8 | DMSFRE | Occurs when TYPCALL=BALR is | Ihen a system abend 
| | | specified in the DMSFREE or | occurs, use DEBUG to 
| | | DMSFRET Macro devices. | attempt recovery. 


| 101 | DMSSVN | The wait count specified in I Examine the program 
I | | an OS WAIT macro was larger | for excessive wait 
| | | than the number of ECBs | count specification. 
I | | specified. | 


| 104 | DMSVIB | The OS interface to DOS/VS | See the additional er- 
| | | VSAM is unable to continue | ror message accompany- 
| | | execution of the problem I ing the abend message, 
I | | program. I correct the error, and 
III I reexecute the program. 


| 155 | DMSSLN | Error during LOADMOD after | See the last LOADMOD 
I | | an OS LINK, LOAD, XCTL, or | (DMSMOD) error message 
|| | ATTACH. The compiler switch | for error description. 
I | I is on. I In the case of an I/O 
III I error, recreate the 
III I module. If the module 
III I is missing, create it. 



Figure 24. CMS Abend Codes (Part 2 of 4) 
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i Abend! Module | 1 

| Code i Name | Cause of Abend | Action 


| 15A | DMSSLN | Severe error during load | See last LOAD error 
j | | (phase not found) after an | message (DMSLIO) for 
| | | OS LINK, LOAD, XCTL, or | the error description. 
| | j ATTACH. The compiler switch | In the case of an I/O 
| | I is on. I error, re-create the 
III I text deck or TXTLIB. 
Ill I If either is missing, 
III I create it. 


| 174 | DMSVIB | The OS interace to DOS/VS | See the additional er- 
| | | VSAM is unable to continue | ror message accompany- 
i j j execution of the problem | ing the abend message, 
| | | program. | correct the error, and 

1 i 1 1 rooTornto 4- Via nmrtram 


| 177 | DMSVIB | The OS interface to DOS/VS | See the additional er- 
| | DMSVIP | VSAM is unable to continue | ror message accompany- 
| | | execution of the problem | ing the abend message, 
| | | program. j correct the error, and 
III I reexecute the program. 


I 240 | DMSSVT | No work area was provided | Check HDJFCB specifi- 
| | | in the parameter list for f cation. 
I | | an OS RDJFCB macro. | 


I 400 I DMSSVT | An invalid or unsupported | Examine program for 
| | | form of the OS XDAP macro | unsupported XDAP macro 
I | | was issued by the problem | or for SVC 0. 
I | I program. I 


| 704 | DMSSMN I An OS GETMAIN macro (SVC 4) | Change the program so 
I | | was issued specifying the | that it specifies 
| | | LC or LD operand. These | allocation of only one 
I | | operands are not supported | area at a time. 
I I I by CMS. | 

| 705 | DMSSMN | An OS FREEMAIN macro | Change the program so 

I j I ing the L operand. This j release of only one 
I | | operand is not supported by | area at a time. 
1 1 1 CMS. | 

I 804 | DMSSMN I An OS GETMAIN macro (804 - | Check the program for 
| 80A I I SVC 4, 80A - SVC 10) was | a valid GETMAIN re- 
| | | issued that requested ei- I quest. If more storage 
I | | ther zero bytes of storage, | was requested than was 
I | I or more storage than was | available, increase 
I | | available. | the size of the virtu- 
III I al machine and retry. 


| 905 | DMSSMN | An OS FREEMAIN macro (905 - | Check the program for 
| 90A I I SVC 5, 90A - SVC 10) was | a valid FREEMAIN re- 
| I | issued specifying an area \ guest; the address may 
I | | to be released whose ad- | have been incorrectly 
| | | dress was not on a double- | specified or modified. 
I | | word boundary. | 



Figure 24. CMS Abend Codes (Part 3 of 4) 
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Abendl Module 
Code | Naie 



Cause of Abend 



Action 



A05 
AOA 



DMSSMN 



An OS FREEWAIN macro (A05 - 
SVC 5 f AOA - SVC 10) was 
issued specifying an area 
to be released which over- 
laps an existing free area. 



Check the program for 
a valid FREEHAIN re- 
guest; the address 
and/or length may have 
been incorrectly spec- 
ified or modified. 



Figure 24. CHS Abend Codes (Part 4 of 4) 
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Appendix A: CMS Macro Library 



The following is a list and brief description of the CHS macros 
applicable to Release 5. 

Asterisk (*) indicates that the macro is reserved for IBM use. 

CHS Hacro Function 



*ADT 
*ADTGEN 

♦ADTSECT 
*AFT 

♦AFTSECT 
BATLIMIT 

♦CMSAVE 

♦CMSCB 

♦CMSCVT 

COMPSWT 

*CORG 

♦DBGSECT 
♦DEVGEN 

♦DEVSECT 
*DEVTAB 
*DIAG 
*DIOSECT 
DISPW 

DHSABN 

♦DMSCCB 

*EMSABS 

*DMSDH 

*DHSERR 

♦DHSERT 
EMSEXS 



DHSFREE 

♦DMSFRES 
DMSFRET 

♦DMSIREX 
♦EMSFRT 
*DMSFKX 
DHSFST 



vector table as supported by 
Refer to VH/370 CHS 



Generates a CSECT or DSECT for an active disk table. 
Generates an active disk table (ADT) for a disk; used by 

ADTSECT. 
Generates all the ADTs for CHS. 
Generates a DSECT for an active file table- 
Generates all the AFTs for CMS. 
Table of CPU, punch, and printer limits for user jobs 

running under CMS batch. 
Equivalent to SVCSAVE macro. 

Generates a list of simulated OS control blocks. 
Generates the communication 

CMS. 
Sets the compiler switch on or off 

Command and Macro Reference. 
Sets the origin for CSECT. 

Generates a CSECT or DSECT for DEBUG environment variables. 
Generates a device table for a given device; used by the 

DEVTAB macro. 
DSECT for a device table. 

Generates the device tables for the CMS nucleus. 
Issues a specified CP Diagnose instruction. 
Generates a CSECT or DSECT for all I/O information. 
Generates the calling sequence for the display terminal 

interface. Refer to YM/370 System Programmer's Guide. 
ABEND the virtual machine. Refer to VM/370 System 

Programmer's Guide. 
DSECT describes field of DOS command control block (CCB) . 

Refer to TMZ370 Data Areas and Control Block Logic. 
Allocates a work area for DMSABK. 
Reserved for IBM use. 
Sets up parameter list to type out a CMS error 

Refer to the LINEDIT macro. 
DMSERR work area DSECT. 
Execute an instruction without nucleus protection. 

I15Z322 System Logic and Problem Determination Guide — Volume 

2- 
Gets free storage. Refer to VH/370_Sy.stem Programmer's 

Guide. 
Calls system free storage service routines. 
Releases free storage. Refer to VH/370 System Programmer's 

Guide. 
Calls system free storage service routines. 
Generates a DSECT for free storage management work area. 
Submacro called by DMSFRET. 
Sets up a file status table for a given file. Refer to 

VM/370 System Programmers Guide. 



message; 



Refer to 
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CMS Macro 
EMSKEY 

♦EMSLN 

♦BMSLNC 

♦EMSLNB 

*EMSLNP 

♦EMSLNU 

*BMSLNY 

♦BMSLNZ 

*BMSPIB 

♦EMSTMS 

*EECB 

♦EQUATES 
*EXCP 

*EXTSECT 
*ECB 
FSCB 

♦FSCBB 

FSCLOSE 

♦ESENTR 
ESEHASE 

FSOPEN 

♦FSPOINT 
FSREAB 

FSSTAT3 

*FSTB 
*FSTB 
FSWRITS 

*IVS 

♦GETABT 
*GETFST 

HNBEXT 

HNBINT 

HNBSVC 



*IO 
♦IOSECT 

♦KEYSECT 
♦KXCHK 

*LBM 

*LBHST 
LINEBIT 

*NUCON 



Function 

Sets nucleus protection on or off. Refer to VH/370 System 

h2QlQ and El°bl§J! Betermination Guide — Volume 2. 
Called by BMSERR, LINEBIT macros. 
Called by BMSERR, LINEBIT macros. 
Called by BMSERR, LINEBIT macros. 
Called by BMSERR, LINEBIT macros. 
Called by BMSERR, LINEBIT macros. 
Called by BMSERR, LINEBIT macros. 
Called by BMSERR, LINEBIT macros. 
Passes a fileid in quotes into separate filename, filetype, 

filemode, used by FSCB, and FSPOINT. 
Used by RBTAPE, WRTAPE, and TAPECTL. 



Frees storage control blocks initia 

edit modules. 
Generates CMS equates for symbolic n 
Issues an SVC 0. 

Befines storage for the timer interr 
Generates a file control block (FCB) 
Sets up a file system control bloc 

Command and Macro Reference. 
BSECT that describes fields in 

commands. 
Closes a file. Refer to VM/370 

Reference . 
Used by CMS file system routines at 
Erases a file. Refer to VM/370 

Refe ren ce. 

file- 



lized by BMSEBX for CBS 

ames. 

upt. 

BSECT. 
k. Refer to VM/370 CHS 

CMS PLIST for related 

CMS Command and Macro 

entry. 
CHS Command and Macro 



Refer to VM/370 CMS Command and Macro 



VM/370 CMS Command and 

r to VM/370 CMS Command 

directory) block, 
directory) block. 
. Refer to VM/370 CHS 

ables. 



Opens a 

Reference. 
Executes the CMS POINT function. 
Reads a record from a file. Refer t 

Macro Reference. 
Checks for an existing file. Refe 

and Macro Reference. 
Generates a file status table (file 
Entry to the file status table (file 
Writes a record into a disk file 

Co mm and and Macro Re feren ce. 
Befines storage for file system vari 

Gets a specified active disk table. 
Gets a specified file status table. 

Handles external and timer interrupts. Refer to VM/370 CHS 

Command and Macro Reference. 
Handles interrupt on devices. Refer to VM/370 CMS Command 

and Macro Reference. 
Handles SVCs. Refer to VH/370 CMS Command and Macro 

Reference. 

Contains PLISTs needed to access CMS I/O routines. 
Befines miscellaneous I/O variables. 

Contains variables necessary for storage key handling. 
Checks to see if HX has been entered by the user. 

Loads double multiple (for floating Foint registers) . 

CMS Loader work area. 

Types a line to the terminal. Refer to VM/370 CMS Command 

and Macro Reference. 
Generates a BSECT CMS nucleus constant area. 
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C MS Hacro Fun ctio n 

*OVSECT DMSOVS work area. 

♦OSFST Defines an OS file status table for CS ACCESS. 

*PDSSECT DSECT used for processing HACLIB files. 
♦PGMSECT Defines work area for DMSITP. 
PRINTL Prints a line on the printer. Refer to VH/370 CHS Command 

iU^ Macro Reference. 
PDNCHC Punches a card. Refer to VH/370 CHS Command and Hacro 
Reference. 

RDCARD Reads a card from the reader. Refer to VH/370 CHS Command 

a£3 Macro Reference. 
RDTAPE Reads a record from tape. Refer to VH/370 CH S Command and 

Macro Reference. 
RDTERM Reads a record from the terminal. Refer to VH/370 CHS 

Command and Macro Reference. 
REGEQO Generates symbolic register equates. Refer to VH/370 CHS 
Command and Hacro Reference. 
♦RELPAGES Sets the release pages flag. 

*STDH Storage for multiple floating-point registers. 
STRINIT Initializes storage. Refer to VH/37C CHS Command and Hacro 
Reference . 
♦SUBSECT CSECT or DSECT for CHS SUBSET use. 

♦SVCENT Issues a DMSKEY macro before calling an instruction. 
♦SVCSAVE System save area. 
♦SVCSECT Defines work area for DHSITS. 
♦SYSLOAB Puts in a specified register the address of a specified 

routine in NUCON. 
♦SYSNAMES Saves system names table loaded via CHS routines. 

TAPECTL Positions a tape. Refer to VH/370 CHS Command and Hacro 

Reference. 
*TSOBLKS Contains CPPL, OPT, PSCB, and the ECT for TSO service 

routines. 
♦TSOGET Gets the address of the TSO command processor parameter list 

(CPPL) . 

*DSE Generates assembler OSING and DROP instructions, as needed. 
*OSERSECT Creates user work area* 

WAITD Waits until the next interrupt occurs for the specified 

device. Refer to VH/370 CHS Command and Hacro Reference. 
WAITT Waits until all pending I/O to the terminal has completed. 

Refer to VH/370 CHS Command and Hacro Reference. 
WRTAPE Writes a record to tape. Refer to~VH/370 CHS Command and 

Macro Reference. 
WRTERH Writes a record to the terminal. Refer to VH/37_Q CHS 

Command and Hacro Reference. 
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Appendix B: CMS/DOS Macro Library 



CMS, in this release, contains a DOS macro library with the following 
significant entries. A oore coiplete list may te obtained by invoking 
the DOSMACRO EXEC; this EXEC produces a list of all the macros in the 
DOS library. 

Macro Function 

£CB Generates the DOS/VS command control block. 

COMfiG Returns address of background partitions communication 

region; expands to SVC 33. 

EOJ Normal processing termination; expands to SVC 0. 

OPENR Activates a data file; simulated by DHSOR1, DMSCR2, DHS0R3. 

STXIT Provides/terminates supervisor linkage to user's program 

check routines; simulated by DMSDOS. 

IKQACB DSECT for VSAM ACB (access method control block) . 

IKQEXLST DSECT for YSAM EXLST control block (contains addresses of 

user exit routines. 

IKQRPL DSECT for VSAM RPL (request parameter list control block) . 

SYSCOM DSECT of system communication region. 

ABTAB DSECT of abnormal termination option table. 

BEOX DSECT of Boundary Box; contains beginning and ending 

addresses of background partitions communication region. 

BGCOM DSECT of background communication region. 

FICL DSECT, CMS/DOS first in class table. 

NICL DSECT, CHS/DOS number in class table. 

PCTAB DSECT, program check option table. 

PIB2TAB DSECT, program information block extension. 

PIBTAB DSECT, program information block. 

PDBOWHER DSECT, physical unit block ownership table. 

ANCHTAB DSECT, DOS/VS anchor table. 

BOSAVE DSECT, describes fields in the logical transient area (LTA) . 

FCHTAB DOS/YS fetch table containing fetch/load parameter list. 

MAPPOB DSECT defines fields of CHS/DOS physical unit block (POB) . 

PDBTAB DSECT same usage as MAPPOB. 

DOSCB DOS simulation control block used for the simulation of the 

CMS file control block (FCB) . 

EXCPW DSECT, work area for DMSXCP routine* 

EOSCON Creates CMS/DOS control blocks for DMSNOC. 

LUBTAB DSECT for CMS/DOS logical unit block. 
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Index 



A 

abend (see abnormal termination (abend)) 
ABEND macro 2-39 
abnormal termination (abend) 
CMS 

codes 2-241 
recovery 2-241 
dump (see also CMS (Conversational 
Monitor System) , dump) 
ACCESS command, accessing OS data sets 

2-45 
access method, OS, support of 2-42 

2.CC8SS m © **" ^ O d. c 

BDAM 2-113 

BDAM/QSAM 2-113 

BPAM 2-113 

for ncn-CMS environments 2-113 

OS 2-113 

VSAM 2-113 

CMS support for 2-114 
accessing 

a virtual disk, CMS 2-93 

the file system 2-93 
active disk and file storage management 

2-93 
Active Disk Table {ADT} 2-93 

used in disk management 2-93 
Active File Table (AFT) 2-93 

used in file management 2-93 
ADT (see Active Disk Table (ADT)) 
AFT (see Active File Table (AFT)) 
allocated 

free storage, types of 2-99 

storage, releasing of 2-105 
allocating, storage 2-20 
allocation 

of nucleus free storage 2-104 

of user free storage 2-104 
AMSERV function, execution of 2-114 
ATTACH macro 2-40 
AUSERRST, HALT option 2-242 
AOTOCR, IPL command processing 2-58,2-242 



B 
batch 

CMS 2-149 

modules used in 2-152 

facility (see CMS Batch Facility) 
BDAM 

CMS support of 2-113 

restrictions on 2-44 

support of 2-43 



EDAM/QSAM, CMS support of 2-113 

BLDL macro 2-39 

BPAM 

CMS support of 2-113 

support of 2-43 

BSAM/QSAM, support of 2-43 

BSP macro 2-41 



called routine 

register contents, when started 2-69 

start-up table 2-69 
caller, returning to 2-69 
carriage control characters, CMS 2-97 
chain header block 2-101 

FLCLB in 2-102 

FLCLN in 2-102 

FLHC in 2-102 

FLNO in 2-102 

FLPA in 2-103 

format 2-102 

MAX in 2-102 

NDM in 2-102 

POINTER in 2-102 

SKEY in 2-103 

TCODE in 2-103 
chain links 2-87 
Channel Address Word 

Address Word)) 
Channel Status Word 

Status Word)) 
CHAP macro 2-40 
CHECK macro 2-42 
CHECK processing, OS VSAH 
CHKPT macro 2-41 

CLOSE, OS VSAK, simulation of 2-119 
CLCSE/TCLOSE macros 2-40 
CMS (Conversational Monitor System) 
(see also virtual machines) 

ABEND codes 2-241 

accessing the file system 2-93 

Batch Facility (see CMS Batch Facility) 

batch facility 2-149 

modules used in 2-152 

called routine table 2-31 

command, handling 2-62 

command language 2-2 

command processing 2-30 

commands (see CMS commands) 

console management 2-62 

devices supported 2-13 

DEVTAB (Device Table) 2-12 



(see CAW (Channel 
(see CSW (Channel 



2-121 



Index 2-253 



diagnostic aids 2-237 
directories 2-155 
disk organization 2-88 
disk storage management 2-92 
DMSFREE 2-12 

free storage management 2-17 

macro description 2-17 

service routines 2-22 
DMSFRES macro description 2-22 
DMSFRET macro description 2-21 
DMSITS 2-26,2-32 
DMSNUC 2-12 
DOS/VS support 2-48 
dynamic storage management 2-93 
error codes 

DMSFREE 2-240 

DMSFRES 2-240 

DMSFRET 2-240 

DMSFREX 2-240 
file 

execution 2-62 

processing 2-62 
file status table block 2-87 
file status table format 2-87 
file status tables 2-86 
file system 2-4,2-6 

accessing 2-93 

management 2-86 
files, storage organization of 2-86 
first command processing 2-60 
free storage management 2-14,2-99 

DMSFREE 2-17 

GETMAIH 2-14 
function table 2-34 

reserved names 2-34 
functional information 2-11 
handling, of PSW keys 2-107 
initialization for OS SVC handling 2-59 
interactive console environment 2-62 
interface with display terminals 2-34 
interrupt handling 2-7 
interrupts, processing 2-98 
introduction 2-2 
I/O control flow 2-95 
I/O operations 2-94 
IPL command processing 2-58 
label to module cross refarence 2-189 
loader 2-71 
loader tables 2-14 
loading, from card reader 2-57 
maintaining interactive session 2-62 
master file directory 2-90 
miscellaneous functions 2-148 
module entry point directory 2-157 
module to label cross reference 2-169 
nucleus 2-13 
OS and DOS VSAM 

functions supported 2-48 

hardware devices supported 2-49 



overview of functional areas 2-52 
printer carriage control 2-97 
printing a file 2-97 
processing, commands entered during 

2-63 
program 

development facilities 2-5 

organization 2-50 
punching a card 2-96 
read disk I/O 2-98 
reading a card 2-95 
record formats 2-88 
register usage 2-11 
restrictions on, as a saved system 

2-109 
returning to calling routine 2-31 
routines that access the file system 

2-93 
simulation 

of DOS environment 2-137 

of OS by 2-122 
storage 

constant initialization 2-58 

map 2-16,2-58 

structure 2-12 
structure of DMSNUC 2-11 
SVC handling 2-26,2-32 
symbol references 2-11 
system functions 2-53 
system save area modification 2-32 
transient area 2-13,2-29 
user 

area 2-29 

program area 2-14 
0SERSECT (Oser Area) 2-12 
virtual devices used in 2-239 
virtual machine initialization 2-57 
write disk I/C 2-98 
CMS commands 

ACCESS 2-45 
FILEDEF 2-46 
how to add one 2-34 
CMS macro library 2-247 
CMSAMS-CMSVSAK DCSSs, storage relationships 

with DMSASM 2-115 
CHSCB, defined 2-124 
CBSCVT, defined 2-124 
CHS/DOS 

CLOSE functions 2-140 

routines that perform them 2-141 
DOSLKED command 2-142 
environment, termination of 2-148 
environment termination command 

DMSEAB 2-148 

DMSDMP 2-148 

DMSITP 2-148 
execution related control commands 

2-142 
FETCH command 2-142 
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initialization 2-138 

data areas 2-138 
initialization for OS VSAM processing 

2-119 
OPEN functions 2-140 

routines that perform then 2-140 
service command processing 2-148 
service commands 

DM SDSL 2-148 

DMSDSV 2-148 

DMSPRV 2-148 

DMSRRV 2-148 

DSSSRV 2-148 

ESERV 2-148 
SVC functions 

CANCL-SVC 6 2-144 

CDLOAD-SVC 65 2-146 

EOJ-SVC 14 2-145 

EXCP-SVC 2-144 

FETCH-SVC 1 2-144 

FETCH-SVC 2 2-144 

FETCH-SVC 4 2-144 

FREEVIS-SVC 62 2-146 

GETVIS-SVC 61 2-146 

MVCOM-SVC 5 2-144 

POST-SVC 40 2-146 

RELEASE-SVC 64 2-146 

RUNMODE-SVC 66 2-146 

SSCTVAL-SVC 75 2-146 

simulation of 2-144 

SVC 11 2-145 

SVC 12 2-145 

SVC 16 2-145 

SVC 17 2-145 

SVC 26 2-145 

SVC 33 2-145 

SVC 34 2-145 

SVC 37 2-146 

SVC 50 2-146 

SVC 8 2-145 

SVC 9 2-145 

SVC 95 2-146 

treated as NOPs 2-147 

OSE-SVC 63 2-146 

WAIT- SVC 7 2-145 
SVC functions not supported 2-147 
SVC handling 2-116 
CMS/DOS macro library 2-251 
CMSDOS-CMSVSAM-user program storage 

relationships 2-117 
CMS/VSAM error return processing 2-121 
CMSVSAB-CHSDOS-user program storage 

relationships 2-117 
command 

handling, CMS 2-62 
language, CMS 2-2 
processing 

SET DOS ON 2-62 

SET SYSNAME 2-61 



commands (see CBS commands, CP commands 
and RSCS commands) 

file system manipulation 2-85 

passed via DMSINS, execution of 2-63 

process of, entered during CMS 2-63 
completion processing 

DOS VSAM programs 2-121 

OS VSAM programs 2-121 
console 

function (see CP (Control Program)) 

management, CMS 2-62 
control block, manipulation macros, 

simulation of, VSAM 2-120 
control card routine 2-81 

ENTRY card 2-81 

LIBRARY card 2-81 
control flow for I/O processing 2-94 
Control Program (see CP (Control Program)) 
conventions 

linkage 2-66 
SVCs 2-66 
Conversational Monitor System (see CMS 

(Conversational Monitor System)) 
CP (Control Program) , handling of saved 

systems 2-108 
cross reference 

label to module, CMS 2-189 

module to label, CMS 2-169 



data base, loader 2-83 

data set control block (DSCB) 2-42 

data sets 

OS 

accessing 2-45 
defining 2-46 
reading 2-45 
DCB macro 2-42 
DDR program (see DASD Dump/Restore (DDR) 

program) 
DELETE macro 2-39 
DEQ macro 2-40 
DETACH macro 2-41 
devices, CMS-supported 2-13 
DEVTAB (Device Table) 2-12 
DEVTYPE macro 2-40 
diagnostic aids, CMS 2-237 
directories, CMS 2-155 
disk 

and file storage management 2-93 

I/O, CHS 2-98 

organization in CMS 2-88 
disk storage management 

CMS 2-90 

QMSK used in 2-90 

QQMSK used in 2-90 
display terminals, CMS interface 2-34 



Index 2-255 



DISPSW macro display terminals, DISPSW 

macro 2-34 
DMKDDR (see DASD Dump Restore (DDR) 

program) 
DMSABN module, batch, CMS 2-152 
DMSACC module 2-130,2-131 

used for access 2-93 
DMSACF module 2-132 
DMSACM module 2-132 
DBSALU module 2-132 
DMSAMS, operation of 2-115 
DMSAMS-CMSAMS-CMSVSAM, storage 

relationships 2-115 
DMSARE module 2-131,2-132 
DMSASN module 2-138,2-139 
DMSBOP module 2-116,2-141 
DMSBOP VSAM processing 2-116 
DMSBTB, general operation 2-149 
DMSBTB module 2-149 
DMSBTP, general operation 2-150 
DMSBTP module 2-150 
DMSCLS module 2-117,2-142 
DMSCLS VSAM processing 2-117 
DMSCPF module, batch, CMS 2-153 
DMSCRD module, batch, CMS 2-152 
DMSDLB module 2-138,2-140 
DMSDLK module 2-143 
DMSDOS module 2-116 
DMSDOS VSAM processing 2-116 
DMSDSK module, batch, CMS 2-153 
DMSDSL, service commands, CMS/DOS 2-148 
DMSDSV, service commands, CMS/DOS 2-148 
DMSERR 

HALT option 2-242 

ADSERRST N0CON field 2-242 
DMSERR module, batch, CMS 2-152 
DMSEXS 2-25 
DMSEXS macro 

CMS 2-108,2-112 
format 2-112 
DMSFCH module 2-142 
DMSFET module 2- 142 
DMSFLD module 2-131,2-132 

batch, CMS 2-153 
DMSFRE module 

method of operation 2-104 

used in free storage management 2-99 
DMSFRE service routine 2-105 

CALOC option of 2-107 

CHECK option of 2-106 

CKOFF option of 2-107 

CKON option of 2-106 

INIT1 option of 2-105 

INIT2 option of 2-106 

UREC option of 2-107 
DMSFREE 2-12 

allocated storage 2-105 

allocating nucleus free storage 2-20 

allocating user free storage 2-20 



error codes 2-24,2-110,2-240 

free storage allocation 2-100 

free storage pointers 2-101 

operands 2-17 

request efficiency 2-104 

service routines 2-22 

storage management 2-17 
DMSFRES 2-22 

error codes 2-24,2-110,2-240 

operands 2-22 
DMSFRES macro 

CMS 2-111 

format 2-111 
DMSFRET 2-21 

error codes 2-24,2-110,2-240 

operands 2-21 

releasing storage 2-21 
DMSFREX error codes 2-240 
DMSINA 2-28 

DMSINI module, batch, CMS 2-152 
DMSINS module 

batch, CMS 2-152 

executing commands 2-63 
DMSINT 2-28 
DMSINT module 2-64 
DMSIOW 2-9 
DMSITE 2-10 

DMSITE module, batch, CMS 
DMSIT1 2-7 
DHSITP 2-9 
DMSITS 2-7,2-26,2-32 
DKSITS module 2-65 
DMSKCP VSAM processing 2 
DMSKEY 2-25 

DHSKEY macro, CMS 2-108, 
DMSLDR module 2-82 

batch, CMS 2-152 
DHSLDS module 2-131,2-13 
DMSLFS module 2-133 
DMSLLU module 2-138,2-13 
DMSMVE module 2-131,2-13 

batch, CMS 2-152 
DMSNOC 2-11,2-12 
DMSOPT module 2-138,2-13 
DMSPIO, carriage control 
DMSPIO module 2-97 

batch, CMS 2-152 
DMSPRV, service commands, 
DMSQRY module 2-131,2-13 
DMSRDC module, batch, CMS 
DMSROS module 2-133,2-13 
DMSRRV, service commands, 
DMSSCT module 2-135 
DMSSEB module 2-135 
DMSSET module 2-138 

batch, CMS 2-153 
DMSSOP module 2-135 
DKESRV, service commands, 
DMSSTT module 2-131,2-13 



2-152 

-117 
2-111 



characters 2-97 



CMS/EOS 2-148 



2-153 



CMS/EOS 2-148 



CMS/EOS 2-148 
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DMSSYT module 2-136 
DMSVIP module 2-119 
DMSXCP module 2-117 
DOS 

CLOSE functions 2-140 

environment simulation under CMS 2-137 

initialization 2-137,2-138 

assign logical and physical units 

2-139 
associate a DTF table filename with a 

logical unit 2-140 
data areas 2- 138 
for OS VSAfi processing 2-119 
list assignments of CHS/DOS logical 

units 2-139 
reseting compiler options 2-139 
resetting DOS environment options 

2-139 
setting compiler options 2-139 
setting DOS environment options 
2-139 
OPEN functions 2-140 
SVC calls 2-67 
system ccntrol commands, processing of 

2-137 
VSAM 

functions supported by CMS 2-48 
hardward devices supported by CMS 
2-49 
DOS commands 2-137 
DOS VSAM 

completion processing 2-121 
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